Ako obnoviť Kliešte vo VB6

Naučiť sa sledovať čas v programe Visual Basic 6.0 , je dôležité , keď sa ukazuje dobu medzi rôznymi akciami , alebo pri ladení času rôznych algoritmov . Vstavaná funkcia " GetTickCount " umožňuje sledovať množstvo milisekúnd , ktoré uplynuli medzi dvoma udalosťami . Resetovanie počet kliešť sa vykonáva jednoducho znovu volaním funkcie " GetTickCount " . Odčítaním dvoch " GetTickCount " čítania vám meranie času , ktorý uplynul . Pokyny dovolená 1

Otvorte VB6 súbor v aplikácii Microsoft Visual Studio 6.0
2

deklarovať dve premenné pre sledovanie začiatku a na konci časovača pridaním nasledujúci kód do vašich funkcií . :

Dim lng_Beg As Long Dim

lng_End ako dlho
3

Volanie funkcie " GetTickCount " pre spustenie sledovanie času pridaním kódu :

lng_Beg = GetTickCount

function ( ) " GetTickCount " ukladá počet milisekúnd , ktoré uplynuli od systému zapnutá . Ak je systém ponechaný na dobu dlhšiu ako 49,7 dní , prepad je možné , pretože čas je uložená ako 32-bitové hodnoty DWORD . Na mnohých systémoch skutočný čas medzi kliešťami je 10 alebo 16 ms .
4

Pridať kód , ktorý chcete na čas , ako sú slučke , spracovanie súboru alebo získavanie informácií z databázy .

5

Obnoviť kliešte opätovným volaním funkcie " GetTickCount " , tým , že pridá kód :

lng_Beg = GetTickCount ( )

predchádzajúce Počet kliešť je teraz zlikvidovať < . br > Praha 6

Dokončenie kód , ktorý chcete čas a potom volanie funkcie " GetTickCount " znova pridaním kód :

lng_End = GetTickCount ( )
7

Zobrazenie množstvo milisekúnd , ktoré uplynuli od resetovať počítadlo tick pridaním kódu :

MsgBox CStr ( lng_End - lng_Beg )

" CStr " konvertuje " Long " dátový typ do tlačiteľné reťazca .
8

Uložte súbor VB6 a skompilovať a spustiť program pre zobrazenie , ako dlho trvá spustiť kód .

• Predchádzajúca strana: Ako zmeniť funkcie vo VB6 
• Ďalšia strana: Ako formátovať desatinné miesta v jazyku Visual Basic