LibreOffice 24.8 žinynas
Grąžina sisteminių žymėjimų, kuriuos pateikia operacinė sistema, skaičių. Šią funkciją galite naudoti tam tikriems procesams optimizuoti.
GetSystemTicks()
Long
Sub ExampleWait
Dim lTick As Long
lTick = GetSystemTicks()
Wait 2000
lTick = (GetSystemTicks() - lTick)
MsgBox "" & lTick & " Ticks" ,0,"Pauzė truko"
End Sub