|
HiResTimer_GetElapsedTime
(XAPI2000)
Deklaration VB 6.0
Function HiResTimer_GetElapsedTime () As Long
Deklaration VB.NET
Function HiResTimer_GetElapsedTime () As Integer
Beskrivning
Returnerar förfluten tid i mikrosekunder sedan anrop av
HiResTimer_Start.
Returvärden
Funktionen returnerar förfluten tid i mikrosekunder. Stöds inte
högprecision-timers av systemet returnerar funktionen 0.
Se även
HiResTimer_Start,
HiResTimer_GetFrequency
|
Exempel
Nedanstående exempel mäter hur många
mikrsosekunder det tar att tilldela en label en textsträng i ett formulär.
Dim X As Long
' Sätt datatyperna till 'Integer' i VB.NET
Dim T As Long
' Först kollar vi hur mycket själva timer-funktionerna
tar på sig vid anrop
' och lagrar resultatet i variabeln X
HiResTimer_Start
X = HiResTimer_GetElapsedTime()
' Nu startar vi en tidmätning
HiResTimer_Start
' Vi tilldelar en label en textsträng (vi ska mäta
tiden för denna process)
Label1 = "SamLogic VB Super Library"
' Nu hämtar vi förfluten tid i mikrosekunder och drar
av X från detta och
' lagrar resultatet i variabeln T
T = HiResTimer_GetElapsedTime() - X
|
