Bouton Stop

Question

Bonjour,

J'essaie de réaliser un bouton stop qui lorsqu'il serait appuyé stopperait complétement mon programme sans le quitter. 
Ex : le programme est entrain d'effectuer la procédure "AAA", j'appuie sur "stop". Le programme arrête la procédure que j'était entrain de faire.

Merci
a+

cs_DARKSIDIOUS · Answer

Utilise une variable booléenne dont tu teste la valeur dans ta procédure à chaque tour de boucle par exemple. _ Avant de poster dans le forum, prière d'aller lire ceci : http://www.codes-sources.com/reglement.aspx

kiboumz · Answer

Re,

J'y avais pensé, mais le problème est que :

Exemple:

private sub stopclick(e, sender) handle stop.click
   blnStop = true
end sub

while not blnStop
....
....
....
End while

Si je clique pendant que mon while est au début, toutes les lignes comprisent dans le while, font quand même s'exécuté avant de re-vérifier la condition....

Merci
a+

cs_DARKSIDIOUS · Answer

bah tu n'as pas trop le choix : à moins de faire un test entre chaque ligne... _ Avant de poster dans le forum, prière d'aller lire ceci : http://www.codes-sources.com/reglement.aspx

kiboumz · Answer

Re,

C'est bien ce que je craignais...

Merci quand même
a+

JB76000 · Answer

J'ai peut-être une solution.
Que je réfléchisse un peu...

En début de code, tu places un select case A
Pour chaque valeur de A correspond 1 ligne de programme.
A la fin de ta fonction, tu incrémentes A, de façon à changer de ligne à chaque tour de programme, suivi de ton test de bouton stop.

Bon, c'est une solution, probablement plus lourde que de rajouter le test 1 ligne sur 2.

Jer

asecher · Answer

Ah, ouais, je ne voyais pas sous cet angle là. Mais je pense que la gestion d'erreur (qui est quand même un évènement comme un autre, somme toute) reste le plus simple...

Cordialement,

Alain 31

Bouton Stop

6 réponses

Votre réponse

Discussions similaires