Compte a rebour au format hh:mm:ss en trois lignes

0/5 (6 avis)

Snippet vu 8 677 fois - Téléchargée 38 fois

Contenu du snippet

Voic un compte a rebours qui utilise le format Date. ce qui permet de faire hyper simple

Vous avez besoin d'un text box et d'un timer avec un intervalle "1000"

Source / Exemple :


Public CptRebours As Date

Private Sub Form_Load()
CptRebours = "00:05:00"
End Sub

Private Sub Timer1_Timer()
CptRebours = CptRebours - TimeSerial(0, 0, 1)
Text1.Text = CptRebours
End Sub

A voir également

Ajouter un commentaire Commentaires
Shuya83190 Messages postés 4 Date d'inscription mercredi 20 avril 2005 Statut Membre Dernière intervention 15 juin 2005
27 janv. 2006 à 00:23
Le codage est bon, très utile pour les débutants, bravo :)
burnouze Messages postés 38 Date d'inscription mercredi 10 novembre 2004 Statut Membre Dernière intervention 15 mai 2009
27 nov. 2004 à 01:44
excelent

merci c est juste ce que je voulais
devmax98799 Messages postés 76 Date d'inscription mercredi 5 février 2003 Statut Membre Dernière intervention 12 août 2009
14 sept. 2003 à 17:23
salut tous le monde. Pour le niveau 2 j'ai du me gourer quand je l'ai soumis. Bien sur que c du niveau 1. Le principal c'est de poster...
cs_steven007 Messages postés 150 Date d'inscription jeudi 24 janvier 2002 Statut Membre Dernière intervention 27 avril 2007
21 août 2003 à 04:11
bien vu
cs_Booster Messages postés 235 Date d'inscription mercredi 30 octobre 2002 Statut Membre Dernière intervention 6 octobre 2009
21 août 2003 à 04:01
tien j'y avai po penser ^^, l'idee est bien mais chui comme Nicolux c niveau 1 po 2 donc pour la peine je met 6
Afficher les 6 commentaires

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.