Un comptador de temps en VB6

Un cronòmetre és una eina que ... bé, jo no crec que sigui apropiat per explicar el que un cronòmetre i no ha de saber com fer un Visual Basic 6.

Les funcions són molt simples: un botó d'inici que no s'aturarà el cronòmetre es posarà en marxa aviat, comptant els segons que transcorren en el interí.

En fer clic al botó de nou, mentre que el seu títol és aturar el rellotge es reiniciarà i es detindrà.

Creem un nou EXE en la nostra còpia de Visual Basic 6 i crear un formulari, afegir una etiqueta, una ordre i un temporitzador:

Assignar l'etiqueta amb el nom, el nom del botó de comandament i assignar el nom a l'hora d'activació.

Farem doble clic en el comptador de temps i afegiu el següent codi:

 Tempo_Timer Private Sub ()



    



 conta.Caption conta.Caption + 1 =







 End Sub

Anem a augmentar el valor de l'etiqueta a un.

Com més complex sigui el codi s'aplicarà en el botó:

 Privat comando_Click Sub ()



    



 Si comando.Caption = "Inici" i després



        



 tempo.Enabled = true



        



 comando.Caption = "Stop"



        



 Truqui tempo_Timer



        



 tempo.Interval = 1000



    



 Més



        



 tempo.Enabled = false



        



 comando.Caption = "Inici"



        



 tempo.Interval = 0



        



 conta.Caption = 0



    



 End If







 End Sub

Nosaltres verifiquem en primer lloc que és el seu inici capition, en aquest cas anem, amb la finalitat de:

• Activar el temporitzador per executar;
• canviar el nom del títol del botó d'inici per aturar;
• cridar a la funció que augmenta el valor del cronòmetre;
• per establir un segon (1000) que s'executa el temporitzador d'interval.

En aquest punt, el rellotge es posarà en marxa i es veurà la manera següent:

En fer clic de nou en parada, en temps d'execució, el programa entrarà en el bloc Else condicional i realitzar les següents funcions:

• Desactivar el temporitzador;
• canviar el títol del botó d'aturada per començar;
• per aturar l'interval;
• per restablir el valor del cronòmetre.