Ayuda de LibreOffice 24.8
Devuelve el número de ticks del sistema que proporciona el sistema operativo. Esta función puede utilizarse para optimizar algunos procesos.
GetSystemTicks()
Long
Sub ExampleWait
Dim lTick As Long
lTick = GetSystemTicks()
Wait 2000
lTick = (GetSystemTicks() - lTick)
MsgBox "" & lTick & " Ticks" ,0,"La pausa ha durado"
End Sub