恭喜,你发布的帖子
发布于 2024-07-07 09:17:27
9楼
如果多次调用,可以将这段代码写成一个项目函数,这样就相当于有这个函数了。
VBS函数:
Public Function MyInt(Number)
Dim decimal,Result
Result=Int(Number)
decimal=Number-Result
If decimal>0 Then
Result=Result+1
End If
MyInt=Result
End Function
请填写推广理由:
分享
只看
楼主