GetSystemTicks funtzioa

Sistema eragileak emandako sistema-tickak itzultzen ditu. Funtzio hau zenbait prozesu optimizatzeko erabil daiteke.

Sintaxia:

GetSystemTicks()

Itzulera-balioa:

Long

Errore-kodeak:

5 Prozedura-deia ez baliozkoa

Adibidea:

Sub ExampleWait

Dim lTick As Long

    lTick = GetSystemTicks()

    Wait 2000

    lTick = (GetSystemTicks() - lTick)

    MsgBox "Tik-Tak: " & lTikTak & " " ,0,"Pausaren iraupena"

End Sub