Wait Statement

მილიწამებში მითითებული დროის მანძილზე წყვეტს პროგრამის მუშაობას.

Syntax:

Wait millisec

Parameters:

millisec: რიცხვითი გამოსახულება რომელიც შეიცავს დროს (მილიწამებში) რომლის გასვლის შემდეეგაც გაეშვება პროგრამა..

Error codes:

D'oh! You found a bug (text/sbasic/shared/00000003.xhp#err5 not found).

Example:


Sub ExampleWait
Dim lTick As Long
    lTick = GetSystemTicks()
    Wait 2000
    lTick = (GetSystemTicks() - lTick)
    MsgBox "" & lTick & " Ticks" ,0,"The pause lasted"
End Sub