zizouhiba
- Messages postés
-
5
- Date d'inscription
- lundi 15 juin 2009
- Statut
- Membre
- Dernière intervention
- 24 janvier 2016
Bonjour,
Je voudrait sortir d'une boucle que je lance avec command1 en utilisant command2. J'ai essayé ça mais ça ne marche pas :
Dim fin As Boolean
Private Sub Command1_Click()
Do
Text1.Text = Str(Time)
Loop Until fin = True
End Sub
Private Sub Command2_Click()
fin = True
End Sub
Merci de m'aider.