Discussion :

[zentaf]

Bonjour

J'ai un problème avec la fonction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

DateAdd(intervalle, valeur, date)

Je veux réalisé avec, une horloge qui s'affiche ds un label :
Au 'load' de la 'form' la variable t qui est string prend la valeur de time$ ; un timer avec un intervalle de 1000 (1 seconde) contient l'instruction :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

t=DateAdd("s",1,t)

L'horloge fonctionne parfaitement mais à minuit ("00:00:00") t devient une date+heure, alors comment peux-je éviter ce problème?

(J'ai utilisé une variable t et non pas l'heure système directement(time$) pour que t ne soit pas modifié alors que time$ peut être modifié)

[SfJ5Rpw8]

Peu-être en utilisant la fonction Format pour n'afficher que la partie heure de ton temps "t" ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
msgbox Format(t,"hh:nn:ss")

[edit] tu peu aussi faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
t = TimeValue(DateAdd("s", 1, t))

[OhMonBato]

J'allais poster la même réponse que bbil, mais j'ajoute que la précision du contrôle Timer n'est pas exceptionnelle. Je pense que tu risques davoir un décalage progressif de ton heure avc cette méthode, en tout cas sur une période assez longue (à tester).