Site: | Cours VB.net |
E 4.1 | Exemples: Horloge. |
Très Simple: Comment créer une horloge numérique?
15:21:45 |
Dans la fenêtre Form1.
Mettre un Timer (Timer1)
Mettre un label (Label1)
Ajouter le code
Private
Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.LoadTimer1.Interval = 1000 'Timer1_Tick sera déclenché toutes les secondes.
Timer1.Start() 'On démarre le Timer
End Sub Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.TickLabel1.Text = Now.ToLongTimeString 'Affiche l'heure format long.
End SubSimple!! non!!