CHRONOMÈTRE

DocteurVB Messages postés 211 Date d'inscription lundi 19 août 2002 Statut Membre Dernière intervention 20 mai 2005 - 23 déc. 2002 à 18:31
cs_Clem Messages postés 282 Date d'inscription dimanche 1 avril 2001 Statut Membre Dernière intervention 12 février 2007 - 24 déc. 2002 à 17:29
Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/5428-chronometre

cs_Clem Messages postés 282 Date d'inscription dimanche 1 avril 2001 Statut Membre Dernière intervention 12 février 2007
24 déc. 2002 à 17:29
lol, c suis dac avec VicoLaChips2n ido & Ktb
Ktb Messages postés 80 Date d'inscription mercredi 13 mars 2002 Statut Membre Dernière intervention 8 novembre 2006 1
24 déc. 2002 à 12:16
Je suis d'accord, les timers de VB y connaissent pas vraiment la précision (et s'il n'y avait qu'eux !)
cs_ido Messages postés 30 Date d'inscription jeudi 21 novembre 2002 Statut Membre Dernière intervention 9 juin 2004
24 déc. 2002 à 09:54
c clair ! faut surtout pas utlisé le timer !!!

Mieu vaut passer par la fonction timer dans un boucle infini... ça sra plus precis
VicoLaChips2 Messages postés 436 Date d'inscription dimanche 20 janvier 2002 Statut Membre Dernière intervention 2 février 2010 2
23 déc. 2002 à 18:44
Sans compter que les timer fourni avec vb6 n'ont aucune précision... il suffit de comparer un code sur une bécane p 233 et un athlon 2000 pour pleurer ... !! -:) Joyeux noël à tous

VIC
DocteurVB Messages postés 211 Date d'inscription lundi 19 août 2002 Statut Membre Dernière intervention 20 mai 2005
23 déc. 2002 à 18:31
y'a quand même plus simple pour faire un Chrono...

avec un timer (timer1)
timer1.interval=1000
et un label (label1)

Private Sub Timer1_timer

seconde=seconde+1

If seconde >59 Then
minute=minute+1
seconde =0
End If

If minute >59 Then
heure=heure+1
minute=0
End If

label1.caption= CStr(heure) +" : "+CStr(minute)+" : "+CStr(seconde)

End Sub


et puis pour la mise a zéro y'a un événement "Load" encore que tu n'en a même pas besoin étant donner que tu as déja mis les label à 0 sur ta form
Rejoignez-nous