GetSystemTicks Function
Liveras la nombron da sistemaj tiktakoj liveritaj de la sistemo. Oni povas uzi ĉi tiun funkcion por optimumigi specifajn procedurojn.
Sintakso:
GetSystemTicks()
Liverota valoro:
Longa
Ekzemplo:
Sub ExampleWait
Dim lTick As Long
lTick = GetSystemTicks()
Wait 2000
lTick = (GetSystemTicks() - lTick)
MsgBox "" & lTick & " Ticks" ,0,"La paŭzo daŭris"
End Sub