主题：[求助]关于四舍五入的问题

程序中表A中有金额、数量、单价列，如果有金额和数量列，希望可以自动计算单价并且保留两位小数。

 怎么写DataColChanged事件程序，用Convert 会报错

 

请各位老师指点，谢谢！

 

Select Case e.DataCol.Name
    Case "金额","数量"
        Dim dr As DataRow = e.DataRow
        If dr("金额") > 0 And dr("数量") > 0 Then
            ’dr("单价") = dr("金额") / dr("数量")
            dr("单价") = convert(dr("金额") / dr("数量") *100,'system.int64') /100
        End If
End Select

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:四舍五入.foxdb

此主题相关图片如下：四舍五入.png