IBM Lotus Symphony
|
Interrompe a execução do programa durante a quantidade de tempo que especificar em milissegundos.
Wait millisec
millisec: Expressão numérica que contém a quantidade de tempo (em milissegundos) que se terá de esperar antes do programa ser executado.
Sub ExampleWait
Dim lTick As Long
lTick = GetSystemTicks()
wait 2000
lTick = (GetSystemTicks() - lTick)
MsgBox "" & lTick & " Ticks" ,0,"The pause lasted"
End Sub