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

  1. unknown_programmer Messages postés 1880 Statut Membre 266
     
    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
    1. LeProgrammer
       
      Bonjour, en reponse a ce que tu dit :

      Justement je cherche cette action qui eteint le programme !
      0
    2. unknown_programmer Messages postés 1880 Statut Membre 266
       
      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
  2. LeProgramer
     
    Desoler pour la reponse si tardive:

    MERCI !
    0
  3. unknown_programmer Messages postés 1880 Statut Membre 266
     
    Pas grave ;)
    0
  4. LeProgramer
     
    je viens de tester mais cela ne marche qu'en vb.net et pas en vbs
    0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. cs_Le Pivert Messages postés 8437 Statut Contributeur 730
     
    Bonjour,

    Essaie ceci:

    WScript.quit

    0
  7. LeProgramer
     
    ahh elle fonctionne, merci,
    mais cette commande ne sert pas a quitter une condition ?
    0
  8. 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
    1. Stikmou85 Messages postés 3 Statut Membre
       
      Pourquoi ne pas mettre tout simplement un Exit Sub ?
      if rep = vbNo then Exit Sub
      0
    2. PlacageGranby Messages postés 402 Statut Membre 26
       
      Je suis un peu rouillé, mais
      application.exit
      0