Abilitare JavaScript nel browser per visualizzare le pagine della Guida di LibreOfficeDev.

Funzione GetSystemTicks

Restituisce il numero di scatti di sistema eseguiti dal sistema operativo. Questa funzione può essere usata per ottimizzare alcuni processi.

Sintassi:


GetSystemTicks()

Valore restituito:

Long

Codici di errore:

5 Richiamo di procedura non valido

Esempio:


Sub ExampleWait
Dim lTick As Long
    lTick = GetSystemTicks()
    Wait 2000
    lTick = (GetSystemTicks() - lTick)
    MsgBox "" & lScatti & " Scatti" ,0,"La pausa è durata"
End Sub