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