主题：[求助]数值自动四舍五入

            For Each r As Row In tb.Rows
                    Dim dr As DataRow
                    dr= dt.Find("编号='" & r("编号") & "'")
                    If dr IsNot Nothing Then
                        'r("重量")=dr("重量")
                    End If
      
            Next

2个重量列都是高精度小数，为什么  执行代码后   r("重量")会被自动四舍五入了呢？
求教

你是不是设置了格式？

 

http://www.foxtable.com/webhelp/scr/0050.htm

 

 没有呀…是一个新表…好郁闷的感觉。还是改成 SQL语句
直接执行update吧。。

 看2楼，小数位数弄成你喜欢的。

 好的，谢谢了！