求教，VBS中怎么取上整

yubing4828

求教~VBS中怎么取上整
比如
dim a,b
a=inputbox("input a number",,"a")
用a获得输入的数字，但可能为小数，我想用b得到a的上整
比如a=2.3  然后b=3

求教，谢谢！

六月天

如果没记错的话貌似vbs中没有类似ceil之类的函数，可以自己做一个啊。

1. Function ceil(byval number)
   
2.         ret = Int(number)
   
3.         If ret <> number Then
   
4.                 ret = ret + 1
   
5.         End If
   
6.         ceil = ret
   
7. End Function

复制代码

yubing4828

哦，没有阿...
还是谢谢啦

error2

Int(number)
Fix(number)