Comment arreter le programme ?

LeProgramer -  
PlacageGranby Messages postés 402 Statut Membre -
bonjour etant debutant en vbs je voudrait que vous m'aidiez sur un point :
En plein milieu de mon programme j'ai plusieurs msgbox vbYesNo qui s'affichent et je voudrait que lorsque on clique sur no le programme se ferme et que les msg box suivantes(car c'est une boucle) ne s'affiche pas. Sachant que les goto ne fonctionne pas.

7 réponses

unknown_programmer Messages postés 1880 Statut Membre 261
 
Bonjour,

lorsque tu crées ton bouton No, tu dois normalement lui appliquer une action avec un mot clef, fait en sorte que lorsque l'on clique sur ce bouton ça appelle une fonction qui exécute une instruction qui permet de fermer le programme ou tout simplement appliquer une instruction qui ferme le programme dés que l'on clique dessus, désolé si je ne suis pas très explicite j'ai recours a mes faibles connaissances en python.
0
LeProgrammer
 
Bonjour, en reponse a ce que tu dit :

Justement je cherche cette action qui eteint le programme !
0
unknown_programmer Messages postés 1880 Statut Membre 261
 
Ce ne serait pas,

Le_Nom_De_La_Fenetre.close()

j'ai trouver ça là:

https://openclassrooms.com/fr/courses/993975-apprenez-a-programmer-en-vb-net/991307-fenetres-supplementaires
0
LeProgramer
 
Desoler pour la reponse si tardive:

MERCI !
0
unknown_programmer Messages postés 1880 Statut Membre 261
 
Pas grave ;)
0
LeProgramer
 
je viens de tester mais cela ne marche qu'en vb.net et pas en vbs
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
cs_Le Pivert Messages postés 8437 Statut Contributeur 729
 
Bonjour,

Essaie ceci:

WScript.quit

0
LeProgramer
 
ahh elle fonctionne, merci,
mais cette commande ne sert pas a quitter une condition ?
0
borntobealive Messages postés 167 Statut Membre 7
 
tu peux essayer :

dim rep as integer 

'ton code ...
'on test ( j'ai mis une msgbox mais tu peux mettre ce que tu veux qui a un bouton non )
rep = MsgBox (blablabla, vbYesNo, ...) 

if rep = vbNo then GoTo fin


et tu rajoute
 fin:
à l'avant-dernière ligne avant le
end sub
0
Stikmou85 Messages postés 3 Statut Membre
 
Pourquoi ne pas mettre tout simplement un Exit Sub ?
if rep = vbNo then Exit Sub
0
PlacageGranby Messages postés 402 Statut Membre 26
 
Je suis un peu rouillé, mais
application.exit
0