A voir également:
- Vb6 timer
- Vb6 - Télécharger - Divers Utilitaires
- Shutdown timer - Télécharger - Personnalisation
- Multi timer - Télécharger - Bureautique
- Marxio timer - Télécharger - Divers Utilitaires
- Vista shutdown timer - Télécharger - Optimisation
1 réponse
Polux31
Messages postés
6917
Date d'inscription
mardi 25 septembre 2007
Statut
Membre
Dernière intervention
1 novembre 2016
1 204
26 juin 2009 à 13:29
26 juin 2009 à 13:29
Bonjour,
Dans une Form, dépose un Timer (Timer1), un label (Label1) et un bouton de commande (Command1) et colle le code dans l'éditeur VB de la form
;o)
Dans une Form, dépose un Timer (Timer1), un label (Label1) et un bouton de commande (Command1) et colle le code dans l'éditeur VB de la form
Option Explicit
Private temps As Long
Private maintenant
Private Sub Command1_Click()
maintenant = Time
Timer1 = True
End Sub
Private Sub Form_Load()
Me.Timer1.Interval = 1000
End Sub
Private Sub Timer1_Timer()
temps = DateDiff("s", maintenant, Time)
Me.Label1.Caption = temps
End Sub
;o)