Wait Statement

Felfüggeszti a program futtatását az ezredmásodpercben megadott ideig.

Szintaxis:

Wait ezredmásodperc

Paraméterek:

ezredmásodperc: Numerikus kifejezés, amely a program futtatása előtt kivárandó időtartamot (ezredmásodpercben) tartalmazza.

Hibakódok:

5 Érvénytelen eljáráshívás

Példa:


Sub ExampleWait
Dim lTick As Long
    lTick = GetSystemTicks()
    Wait 2000
    lTick = (GetSystemTicks() - lTick)
    MsgBox "" & lTick & " Ticks" ,0,"Az idő letelt"
End Sub

WaitUntil statement