Discussion :

[casho]

bonjour,
j'aimerais savoir comment je peux afficher un formulaire dans mon projet toutes les deux heures. j'ai utilisé le Timer mais la durée max est de 5 minutes.
pouvez vous m'aider?

[Delbeke]

utilise la fonction Timer qui renvoie le nombre de secondes ecoulées depuis minuit.

Code :

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

1
2
Dim Start as Long
Start=Timer

[sovo]

bon commencons par le commencement. 2h = 2*60*60 = 7 200 donc en fait tout ce qu'il te faut faire c'est mettre un controle timer et compter jusqu'a ce nombre du genre

Code :

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

1
2
3
4
5
6
7
8
9
10
Private Sub Timer1_Timer()
    Static  heure as integer
 
    If Heure = 7200 then 
         Nom_Form.Show  
         Heure = 0
    Else
         Heure = Heure +1
    End if   
End Sub

Pour plus ample precision sur la chose, une discussion a ete ouverte (et resolu) sur le sujet il y a quelque temps sur le forum :
http://www.developpez.net/forums/sho...d.php?t=203358

[edit]Oups un oubli. mettre la propriete interval a 100 (1 seconde pour plus de precision).

[Delbeke]

Heu, désolé sovo, la propriété interval est en millièmes de seconde, il faut donc mettre 1000 pour un déclenchement toutes les secondes

[sovo]

Heu, désolé sovo, la propriété interval est en millièmes de seconde, il faut donc mettre 1000 pour un déclenchement toutes les secondes

Je sais mais je ne sais pas pourquoi, mais lorsque je mets 1000 ca ne marche pas toutes les 1 seconde, il faut que je mette 100 , alors c'est finalement reste.