IBM Lotus Symphony
|
按照您指定的毫秒数使程序暂停一段时间。
Wait millisec
millisec:数字表达式,含有程序恢复执行之前需要等待的时间长度(以毫秒为单位)。
Sub ExampleWait
Dim lTick As Long
lTick = GetSystemTicks()
wait 2000
lTick = (GetSystemTicks() - lTick)
lTick = (GetSystemTicks() - lTick)
End Sub