以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]数值自动四舍五入  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104384)
--  作者：qwer
--  发布时间：2017/7/28 11:48:00
--  [求助]数值自动四舍五入
            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("重量")会被自动四舍五入了呢？
求教
--  作者：有点甜
--  发布时间：2017/7/28 11:55:00
--  

你是不是设置了格式？

 

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

 
--  作者：qwer
--  发布时间：2017/7/28 12:02:00
--  
 没有呀…是一个新表…好郁闷的感觉。还是改成 SQL语句
直接执行update吧。。
--  作者：有点甜
--  发布时间：2017/7/28 12:03:00
--  
 看2楼，小数位数弄成你喜欢的。
--  作者：qwer
--  发布时间：2017/7/28 12:07:00
--  
 好的，谢谢了！