Problème horloge dynamiqueRésolu

Question

Bonjour a tous !

Je souhaiterais  ins&#233;rer une horloge dynamique dans un label , j'ai parcouru le forum et trouv&#233; une personne ayant exactement la m&#234;me requete que moi mais pour un caption &#224; la place d'un label, le probl&#232;me est que cela ne fonctionne pas chez moi ( oui oui, j'ai bien mis le timer sur ma feuille), en fait la question que j'ai est &#224; propos de ce "time" dans le fonction Format: Comment doit on d&#233;clarer ce time ( integer?????) je ne comprend pas !! Voici le code utilis&#233; !

Private Sub page_menu_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Label5.Text = Format(time, "hh:mm:ss")
        Timer1.Enabled = True

        Timer1.Interval = 1000
    End Sub

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Label5.Text = Time
    End Sub

Voila voila, ou est l'erreur ??? VB express2005 me dit que "time" n'est pas d&#233;clar&#233; ! ( J 'ai &#233;ssay&#233; de le d&#233;clarer en integer, et la, il est &#233;crit ! hh:mmhss , puis une seconde apr&#232;s, il se transforme en 0)

Merci a tous pour votre aide, bonne soir&#233;e !

----( | TanK | )---- 

----( | TanK | )----

cs_Willi · Accepted Answer

Salut,
Remplace Time par DateTime.Now

cs_Jack · Answer

Salut
"Time" devait &#234;tre trop pratique. Ils ont d&#251; l'associer &#224; une classe System ...
M&#234;me moi qui n'aime pas trop 2005, j'ai trouv&#233; en moins de 10 minutes :

Label1.Text = 
Date.Now.TimeOfDay.ToString

Vala
Jack, MVP VB
NB : Je ne r&#233;pondrai pas aux messages priv&#233;s 

Champion du monde de boule de cristal - 2005
Le savoir est la seule mati&#232;re qui s'accro

forum_ma · Answer

Je n'ai pas VB 2005, mais voici moi comment je fais en VB.net 2003 :



Private 
Sub page_menu_Load(
ByVal sender 
As System.Object, 
ByVal e 
As System.EventArgs) 
Handles 
MyBase.Load
      Label5.Text = Format(Now, "hh:mm:ss tt")
      Timer1.Enabled = 
True
      Timer1.Interval = 1000

End 
Sub

Private 
Sub Timer1_Tick(
ByVal sender 
As System.Object, 
ByVal e 
As System.EventArgs) 
Handles Timer1.Tick
      Label5.Text = Format(Now, "hh:mm:ss tt")

End 
Sub

Pour le format tu peux mettre celui tu veux...  De mon cot&#233; sa marche super bien!!

XtremDuke · Answer

Le formatage du temp doit se faire dans ton timer.

En VB6 :
Label5.Text = Format(time, "hh:mm:ss")

En .NET :
Dim  
Heure As DateTime
Label5.Text = Heure.ToString("hh:mm:ss") 

..::DuKe::..

Problème horloge dynamique

4 réponses

Discussions similaires