Salut,
j'ai un petit programme qui lance un navigateur internet.
Lorsque le navigateur a chargé la page, un timer de 1seconde se met en route et incrémente de 1 une variable a chaque fois ( c'est un chrono).
Une boucle se met en route tant que la variable n'a pas atteint le temps voulu.
Mon programme fonctionne trés bien, voici la boucle :
Mon soucis c'est que lorsque l'on ferme le programme et que je regarde dans le gestionnaire des tache il est toujours ouvert.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Do Until tpsattente > View1.ListItems(idsite).SubItems(11) If arret = True Then Exit Sub DoEvents Loop 'attend la fin du compteur Private Sub Form_Unload(Cancel As Integer) arret = True Timer1.Enabled = False End Sub
En faisant avec la variable arret lors de l'unload je pensée que ca marcherai, mais lorsque je l'éxécute ligne par ligne je me rend compte que le programme rééxécute Form_Load() au lieux de se fermer.
Je ne comprend pas pourquoi.
Quelqu'un serait comment sortir des boucles ou bien m'indiquer une astuce avec ce que j'ai fait.
Merci d'avance
Partager