以下统计命令得出的【订单金额】为整数；如何修改才能得出带2位小数点的数值？

Dim t2 As Table = Tables("京东慧采清单表开票窗口_Table2")
t2.DataSource = g2.BuildDataSource() \'生成表
t2.DataTable.DataCols.Add("订单金额", Gettype(Double))
t2.SetColVisibleWidth("用户账号|90|申请日期|90|站段归属|140|申请站段|140|订单提交时间|90|父订单编号|100|订单编号|100|订单金额|80|发票号|140|出库时间|90|订单完成时间|90")

\'If g2.isnull("申请日期")  = Nothing Then
For Each r2 As Row In t2.Rows
    Dim c_gt1 As Integer = DataTables("京东慧采清单表").compute("Sum(实付款)", "  订单编号 = \'" & r2("订单编号") & "\'  ")
    r2("订单金额") = c_gt1
    
Next

t2.DataTable.DataCols("订单金额").SetFormat("0.00")

\'Else
\'End If

MessageBox.show("完成数据核查工作!!!", "非常关键提醒")

Dim c_gt1 As Double = DataTables("京东慧采清单表").compute("Sum(实付款)", "  订单编号 = \'" & r2("订单编号") & "\'  ")