Module
Contents
Index 🔎︎

# Příkaz Wait

Přeruší spouštění programu na dobu, kterou určíte v milisekundách.

## Syntaxe:

    Wait millisec

## Parametry:

millisec: Číselný výraz určující dobu (v milisekundách), kterou bude program čekat.

## Chybové kódy:

5 Neplatné volání procedury

## Příklad:

    Sub ExampleWait

    Dim lTick As Long

        lTick = GetSystemTicks()

        Wait 2000

        lTick = (GetSystemTicks() - lTick)

        MsgBox "" & lTick & " Ticks" ,0,"Přestávka trvala"

    End Sub