cs_yannn
Messages postés130Date d'inscriptionmercredi 4 septembre 2002StatutMembreDernière intervention 5 janvier 2009
-
18 nov. 2003 à 07:59
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 2021
-
18 nov. 2003 à 10:20
Bonjour a tous ...
je souhaiterai faire un programme qui toutes les 5min lance une commande ....
Je croyais que je pourrai faire ca tres facilement avec un time :
Timer=enabled
Timer.interval=1000 '100=1seconde
A=A+1
if A=300000 then COMMANDE: A=0 'au bout de 5min=300000
mais lorsque je l'interroge sur la valeur de A ... : msgbox A
il me laisse A sans valeur ...
Quelqu'un peut il m'aider ?
Merci
Renfield
Messages postés17287Date d'inscriptionmercredi 2 janvier 2002StatutModérateurDernière intervention27 septembre 202174 18 nov. 2003 à 10:20
En Clair :
'# Timer1.Interval = 60000 : UNE MINUTE
Private Sub Timer1_Timer()
Static LoopCounter as long
LoopCounter = LoopCounter +1
If LoopCounter = 5 Then
msgbox "Ce message apparait toutes les 5 minutes"
LoopCounter = 0
End If
End Sub