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

Sosteneteci!