主题：[求助] 小数位保留两位

版主，最扣值保留两位小数，怎么修改   e.DataRow("GSS_totalprice") = sum ？ 谢谢。

If e.DataCol.Name = "ShippingNo"  OrElse e.DataCol.Name = "Totalprice" Then
    Dim sum As Double= 0
    For Each dr As DataRow In DataTables("GSSInvoice").Select("ShippingNo='" & e.NewValue & "'")
        sum += dr("Totalprice")
    Next
    e.DataRow("GSS_totalprice") = sum
End If