Differenze tra le versioni di "Creare un Cronometro"
Da Gambas-it.org - Wikipedia.
| Riga 1: | Riga 1: | ||
Per realizzare un semplice Cronometro porremo sul form un ''Timer'' con ritardo posto ad "1", un ''Button'' ed un oggetto di testo nel quale visualizzare il tempo trasorso: | Per realizzare un semplice Cronometro porremo sul form un ''Timer'' con ritardo posto ad "1", un ''Button'' ed un oggetto di testo nel quale visualizzare il tempo trasorso: | ||
| − | '''Private''' tempo As Date | + | '''Private''' tempo As Date |
Versione delle 10:59, 24 dic 2012
Per realizzare un semplice Cronometro porremo sul form un Timer con ritardo posto ad "1", un Button ed un oggetto di testo nel quale visualizzare il tempo trasorso:
Private tempo As Date
Public Sub Button1_Click()
With Timer1
.delay = 1
.Start
End With
' Assegna l'orario di questo istante:
tempo = Time
End
Public Sub Timer1_Timer()
TextBox1.Text = Format(CDate(Time - tempo), "hh:nn:ss.uu")
End
