Att lära sig att spåra tid i ditt Visual Basic 6.0 -programmet är viktigt när man visar hur lång tid mellan olika åtgärder eller vid felsökning tiden för olika algoritmer . Den inbyggda " GetTickCount " -funktionen kan du spåra hur mycket millisekunder som gått mellan två händelser . Återställa tickningsantal görs genom att helt enkelt ringa " GetTickCount " funktionen igen . Subtrahera två " GetTickCount " läsningar ger dig ett mått på den tid som gått . Instruktioner
1
Öppna din VB6 -fil i Microsoft Visual Studio 6.0
2
Deklarera två variabler för att spåra timerns start och slut genom att lägga till följande kod i din funktion . :
Dim lng_Beg As Long
Dim lng_End As Long
3
Ring " GetTickCount " -funktion för att börja spåra tid genom att lägga in koden :
lng_Beg = GetTickCount ( ) katalog
" GetTickCount " -funktionen lagrar antalet millisekunder som har gått sedan systemet slås på . Om systemet är kvar längre än 49,7 dagar , är ett bräddavlopp möjligt eftersom tiden lagras som ett 32 - bitars DWORD . På många system den faktiska tiden mellan fästingar är 10 eller 16 ms .
4
Lägg koden du vill tid , till exempel en loop , bearbetar en fil eller hämta information från en databas .
5
Återställ fästingar genom att ringa " GetTickCount " funktionen igen , genom att lägga in koden :
lng_Beg = GetTickCount ( ) katalog
tidigare tickningsantal nu kasseras < . br >
6
Avsluta koden du vill tid och sedan kalla det " GetTickCount " funktionen igen genom att lägga till koden :
lng_End = GetTickCount ( )
7
Visa mängden millisekunder som har gått sedan du återställer fästingen räknaren genom att lägga till koden :
MsgBox CStr ( lng_End - lng_Beg ) katalog
" CStr " omvandlar " Long " datatypen i en tryckbar sträng .
8
Spara VB6 filen och kompilera och köra programmet för att se hur lång tid det tar att köra din kod .
