怎样实现如：输入2.499995 输出2.5呢？
            2.5─〉3？
            2.4─〉2？
急求教~~~

如果不保留小数,直接fix(2.499995)

或者
MsgBox Format(2.499995, "#0.0")
后面#0.0是表示格式
如果你要保留2位小数
#0.00

还有其它的用法？
如：int round fix?
    nb=int(2.4)  2
    nb=fix(2.4)  2
    nb=int(-2.5) 2
    nb=fix(-2.5) 3
对吧？
round?

或者直接赋值给整型变量……

等等……5被舍去了，超过5就入了……真神奇

+0.05

如果想保留指定小数位数的四舍五入：
Public RoundValue(NumeberValue as double) as Double
dim k as Integer

   k=val(inputbox("输入保留小数位数：","4","保留小数位数"))
   RoundValue=int(NumeberValue*10^k+0.5)/10^k
end function

另一个vb自带的函数为：Round。

一般人我不告诉他！

不错哦！
很荣幸~