主题：[求助]round2四舍五入

 如果，你觉得有误差。可以改成 format

Dim n As Double = 12.345

n = format(n, "0")

msgbox(n)

什么叫表达式列算不出来？表达式列是不能用代码直接赋值的。

具体问题，最好做个实例，至少截图说明。

这个条件，无论如何也不可能成立吧？首重一般都是整数，round2之后的数据肯定大于等于

dr("包裹重量")>dr("首重") And round2((dr("包裹重量")-dr("首重"))/1000,0)<(dr("包裹重量")-dr("首重"))/1000

 哦，我考虑错了。

 你单独做个例子发上来测试下。代码应该没问题的。