作业帮VB中这样取整用什么函数?如5/3=2,就是哪怕结果为1.1 取值也要为2（进1法吧）.
来源：学生作业帮助网 编辑：作业帮 时间：2024/06/01 04:12:37
VB中这样取整用什么函数?如5/3=2,就是哪怕结果为1.1 取值也要为2（进1法吧）.
没有现成的函数,自己写一个吧,很简单
Function fixup(x As Double) As Integer
Dim a As Integer
a = Fix(x)
If a < x Then a = a + 1
fixup = a
End Function