一个电信计费的函数

发  布：2004-5-11

作  者：竹笛(微软最有价值专家)

摘  要：一个电信计费的函数

正  文：

60秒为1分钟，61秒算2分钟，依此类推

Function ROUNDUP(X As Integer) As Integer

If X Mod 60 = 0 Then
ROUNDUP = X / 60 'Y代表分钟
Else
ROUNDUP = (X - (X Mod 60)) / 60 + 1
End If
End Function