Corsi on-line

Un cronometro in VB6

  • CommentiScrivi un commento
  • ForumDiscuti sul forum
  • PrevMenu dal tasto destro in Visual Basic 6
  • NextIntegrare file Flash in applicazioni VB6

Un cronometro è uno strumento che... vabbè, non penso sia il caso di spiegare cos'è un cronometro, piuttosto è opportuno capire come realizzarne uno in Visual Basic 6.

Le funzioni che imposteremo sono molto semplici: un bottone Start che diventerà Stop appena il cronometro sarà partito, contando i secondi che trascorrono nel mentre.

L'articolo continua dopo la pubblicità

Cliccando nuovamente il bottone mentre la sua caption è Stop, il cronometro si azzererà e si fermerà.

Creiamo un nuovo EXE nella nostra copia di VB6 e creiamo una form, aggiungendo una label, un command ed un timer:

Alla label assegneremo il nome conta, al bottone il nome comando ed al timer assegneremo il nome tempo.

Facciamo doppio click sul timer ed aggiungiamo il seguente codice:

Private Sub tempo_Timer()
    conta.Caption = conta.Caption + 1
End Sub
Andiamo semplicemente ad incrementare il valore della label di una unità.

Più complesso il codice da applicare al bottone:

Private Sub comando_Click()
    If comando.Caption = "Start" Then
        tempo.Enabled = True
        comando.Caption = "Stop"
        Call tempo_Timer
        tempo.Interval = 1000
    Else
        tempo.Enabled = False
        comando.Caption = "Start"
        tempo.Interval = 0
        conta.Caption = 0
    End If
End Sub
Verifichiamo innanzitutto che la sua capition sia Start, nel qual caso andiamo, nell'ordine:
  • ad eseguire l'abilitazione del timer;
  • a rinominare la caption del bottone da Start a Stop;
  • a chiamare la funzione che incrementa il valore del cronometro;
  • ad impostare ad un secondo (1000) l'intervallo di esecuzione del timer.
A questo punto il cronometro sarà partito ed avrà il seguente aspetto:

Cliccando di nuovo su Stop, in fase di esecuzione, il programma entrerà nel blocco condizionale Else, ed eseguirà le seguenti funzioni:
  • disabilitazione del timer;
  • cambio della caption del bottone da Stop a Start;
  • a fermare l'intervallo;
  • ad azzerare il valore del cronometro.

Partecipa alle pre-registrazioni dei domini .cloud

Non perdere l'opportunità di aggiudicarti prima degli altri uno dei nuovi domini .cloud! Prenota i migliori domini e proteggi il tuo nome!

Corsi
  • Corso MS Access
    Corso MS Access
    Impara a creare e gestire database in maniera semplice e veloce. A partire da 29 €
  • Corso Visual Basic 6
    Corso Visual Basic 6
    Realizzare applicazioni Desktop con VB6. A partire da 39 €
Vedi anche...
Guide