timer qui m'enerve !!!

Question

Private Sub Timer3_Timer()
If Case01.BackColor = 500 Then
Text1.Text = Text1.Text & vbCrLf & "salut"
Timer3.Enabled = False
End If
If Case01.BackColor = 170000 Then
Timer3.Enabled = True
End If
End Sub

Comme on peut le voir je souhaite afficher une fois "salut" lorsque la case01 passe a la couleur 500 grace au timer  puis
remettre en route le timer quan la case01 revien a sa couleur initilae qui est 170000 pour que lorsque la case prendra une nouvelle fois la couleur 500 le text1.text affiche "salut" etc....

 merci d'avance a celui qui me sauvera

Vinsus el débutant

ultraxa · Answer

ce quil doit faire c'est :
si couleur = 500 alors text=salut et eteindre le timer
 et ben avec ça il repasera  jamais ds ta procedure puisque tu l'a eteind!!!

il vaut mieux que tutilise des flag( genre flag = true ) et apres tu teste les flags mais par contre n'eteind pas ton timer

et en plus faut faire attebtion averc le timer car si tu fait timer.enabled = true et ben à chaque fois ça le remet à zero

Timer qui m'enerve !!!

1 réponse

Discussions similaires