Enable JavaScript in the browser to display LibreOfficeDev Help pages.

GetSystemTicks Function

Returns the number of system ticks provided by the operating system. You can use this function to optimize certain processes.

Sintakse:


GetSystemTicks()

Atgrieztā vērtība:

Long

Error codes:

5 Nederīgs procedūras izsaukums

Piemērs:


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