四舍五入函数是 format( a ,"0.00") 'a 代表为你要四舍五入的数
用 Round 是就近舍入， Round（a,2) '当a为3.146时结果是3.15当a为3.145时结果就是3.14
先将小数乘以1000，在整除\10(这里起到四舍五入的作用)，然后在/100，就可以了
vb自带函数： Round(数字,小数点后位数)
如：
MsgBox Str$(Round("3.1415926", 2))
print("%4.2d")两位小数
=int(123.15*10)/10 试试
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024