Інструкція Wait

Перериває виконання програми на задану кількість часу в мілісекундах.

Синтаксис:

Wait мілісек

Параметри:

мілісек: число, яке містить кількість часу (в мілісекундах), протягом якого слід очікувати, перш ніж програма буде виконуватися.

Коди помилок:

5 Неправильний виклик процедури

Приклад:


Sub ExampleWait
Dim lTick As Long
    lTick = GetSystemTicks()
    Wait 2000
    lTick = (GetSystemTicks() - lTick)
    MsgBox "" & lTick & " тактів" ,0,"тривала пауза"
End Sub

Будь ласка, підтримайте нас!