| Hjem | Hardware | Netværk | Programmering | software | Fejlfinding | systemer | 
Programmering  
  • C /C + + Programming
  • Computer Programmeringssprog
  • Delphi programmering
  • Java programmering
  • JavaScript Programmering
  • PHP /MySQL programmering
  • Perl programmering
  • Python Programming
  • Ruby Programming
  • Visual Basics Programmering
  •  
    Computer Viden >> Programmering >> Visual Basics Programmering >> Content
    Sådan Reset Flåter i VB6
    At lære at spore tid i din Visual Basic 6.0 program er vigtig, når der viser mængden af ​​tid mellem forskellige handlinger , eller når debugging tidspunktet for forskellige algoritmer . Den indbyggede " GetTickCount "-funktion kan du spore mængden af ​​millisekunder , der er gået mellem to begivenheder. Nulstilling kryds tæller gøres ved blot at kalde " GetTickCount "-funktionen igen. Fratrække to " GetTickCount " aflæsninger giver dig en måling af den tid, der er gået . Instruktioner
    1

    Åbn din VB6 fil i Microsoft Visual Studio 6.0
    2

    Erklær to variabler til at spore timeren start og slut ved at tilføje følgende kode i din funktion . :

    Dim lng_Beg As Long

    Dim lng_End As Long
    3

    Kald " GetTickCount " funktion for at starte sporing tid ved at tilføje koden : < br >

    lng_Beg = GetTickCount ()

    " GetTickCount "-funktionen lagrer det antal millisekunder , der er gået , siden systemet tændt. Hvis systemet er tændt i længere tid end 49,7 dage , et overløb er mulig , fordi den tid gemmes som en 32 - bit DWORD . På mange systemer den faktiske tid mellem flåter er 10 eller 16 ms.
    4

    Tilføj den kode du ønsker at tid, såsom en løkke , forarbejdning en fil eller hente information fra en database.

    5

    Nulstil flåter ved at kalde " GetTickCount "-funktionen igen, ved at tilføje koden : Hej

    lng_Beg = GetTickCount ()

    foregående kryds count er nu kasseret < . br >
    6

    Afslut den kode du ønsker at tid og derefter kalder den " GetTickCount "-funktionen igen ved at tilføje koden : Hej

    lng_End = GetTickCount ()
    7 < p > Vise mængden af ​​millisekunder , der er gået , siden du nulstille kryds tælleren ved at tilføje koden : Hej

    MsgBox CStr ( lng_End - lng_Beg )

    " CStr " konverterer "Lange" datatype i en printbar streng.
    8

    Gem VB6 filen og kompilere og køre programmet for at se , hvor lang tid det tager at udføre din kode.
    < br >

    Forrige :

    næste :
      Relaterede artikler
    ·Sådan læses en fil i en Listbox 
    ·Sådan Divide i VBA 
    ·Visual Basic Network Tools 
    ·Sådan oprettes en Access Connection hjælp af Visual B…
    ·Sådan Dynamisk Tilføj en Control i VB.NET 
    ·. Sådan Lær Visual Studio NET 
    ·Sådan Gør Filtrering i en ListBox i VB.NET 
    ·Returværdi VBA Function 
    ·Sådan Konverter Temperatur i QBasic 
    ·Sådan Stop bip, når Enter Presset på Tekstboks i VB.…
      Anbefalede Artikler
    ·Sådan Konverter en liste i et sæt i Python 
    ·Sådan oprettes PHP-scripts for Applications 
    ·Sådan oprettes forbindelse til en Oracle database i Ja…
    ·Sådan Hent et Tidsstempel Fra datagridview 
    ·Sådan oprettes en abstrakt klasse i NetBeans 
    ·Hvordan laver Java-kode Into en applet 
    ·Sådan sletter noget fra en liste Box i Visual Basic 
    ·Kom længde på en Array i Python 
    ·Hvordan laver Strings Alle som små bogstaver på C + +…
    ·Sådan Find VBA filer 
    Copyright © Computer Viden http://www.computerdk.com