Instrução Wait

Interrompe a execução do programa durante a quantidade de tempo que especificar em milissegundos.

Sintaxe:

Wait millisec

Parâmetros:

milliseg: expressão numérica que contém a quantidade de tempo (em milissegundos) que se terá de esperar antes do programa ser executado.

Códigos de erro

5 Chamada de procedimento inválido

Exemplo:


Sub ExampleWait
Dim lTick As Long
    lTick = GetSystemTicks()
    Wait 2000
    lTick = (GetSystemTicks() - lTick)
    MsgBox "" & lTick & " Ticks" ,0,"A pausa durou"
End Sub

Necessitamos da sua ajuda!