Recuperer choix dans message box ? [Résolu]

Messages postés
251
Date d'inscription
samedi 19 novembre 2005
Dernière intervention
2 novembre 2010
- 16 avril 2007 à 14:12 - Dernière réponse :
Messages postés
3181
Date d'inscription
dimanche 15 février 2004
Dernière intervention
9 avril 2017
- 16 avril 2007 à 14:34
rebonjour,

je commence un "if" par l'affichage d'une messagebox qui propose de choisir "oui" ou "non"
maintenant je veux faire un deuxieme "If" suivant l'icone qui sera cliquée dans la messagebox,
mais je ne sais pas comment gerer la  reponse.

plus clairement, je seche sur la façon de coder :

"si clique sur bouton OUI  de la messagebox alors...sinon"

merci d'avance
Afficher la suite 

Votre réponse

9 réponses

Meilleure réponse
Messages postés
7401
Date d'inscription
mercredi 23 avril 2003
Dernière intervention
6 avril 2012
- 16 avril 2007 à 14:15
3
Merci
Salut,
Exemple un peu grossier en VB6 mais c'est pour l'idée.
Cela ne devrait pas trop changer en .NET

Dim Reponse As VbMsgBoxResult

   '[...]
   Reponse = MsgBox("Voulez vous continuer?", vbYesNo, "Continuer?")
   If Reponse = vbYes Then
       Call MsgBox("OUI appuye")
   Else
       Call MsgBox("NON appuye")
   End If
, ----
[code.aspx?ID=41455 By Renfield]

@+: Ju£i?n
Pensez: Réponse acceptée

Merci jrivet 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 88 internautes ce mois-ci

Commenter la réponse de jrivet
Meilleure réponse
Messages postés
3181
Date d'inscription
dimanche 15 février 2004
Dernière intervention
9 avril 2017
- 16 avril 2007 à 14:34
3
Merci
Avec une MessageBox à DotNet ;



Dim Reponse As DialogResult
'[...]
Reponse = MessageBox.Show("Voulez vous continuer?", "Continuer?", MessageBoxButtons.YesNo)
If Reponse = System.Windows.Forms.DialogResult.Yes Then
  MessageBox.Show("OUI appuye")
Else
  MessageBox.Show("NON appuye")
End If,

----

(Coloration syntaxique automatique par Kenji)




__________
 Kenji

Merci Charles Racaud 3

Avec quelques mots c'est encore mieux Ajouter un commentaire

Codes Sources a aidé 88 internautes ce mois-ci

Commenter la réponse de Charles Racaud
Messages postés
1141
Date d'inscription
mercredi 7 mars 2007
Dernière intervention
19 septembre 2007
- 16 avril 2007 à 14:17
0
Merci
Salut

reponse = msgbox "Question", vbyesno

if reponse = vbok then
   'instruction

else

   'instruction

end if
Commenter la réponse de cs_Nicko11
Messages postés
7401
Date d'inscription
mercredi 23 avril 2003
Dernière intervention
6 avril 2012
- 16 avril 2007 à 14:21
0
Merci
Re,
Bah non [auteurdetail.aspx?ID= 999867 Nicko11]
,  Si tu mets reponse = msgbox "Question", vbyesno
Et que dans ton IF reponse = vbok et bien ton code passera toujours dans le ELSE

@+: Ju£i?n
Pensez: Réponse acceptée
Commenter la réponse de jrivet
Messages postés
251
Date d'inscription
samedi 19 novembre 2005
Dernière intervention
2 novembre 2010
- 16 avril 2007 à 14:23
0
Merci
petit complement: je suis en VB 2005 et j'utilise donc MessageBox.show("voulez vos...", "titre", MessageBoxButtons.YesNo)

j'arrive pas a adapter ton exemple VB6  (debutant inside )

c'est au niveau de "reponse" que je vois pas quoi mettre
Commenter la réponse de Tyrell2
Messages postés
1141
Date d'inscription
mercredi 7 mars 2007
Dernière intervention
19 septembre 2007
- 16 avril 2007 à 14:25
0
Merci
OUI OUI mais j'ai vu, mais c'etait du .net qu'il voulais et tu avais donné la bonne reponse.
 
Mais pour le detail, il ne passera JAMAIS dans le ELSE car il ne passera simplement pas la compilation LOL
J'ai oublié les parantheses.
Commenter la réponse de cs_Nicko11
Messages postés
1141
Date d'inscription
mercredi 7 mars 2007
Dernière intervention
19 septembre 2007
- 16 avril 2007 à 14:28
0
Merci
Au pire, tu mets un point d'arret sur la ligne du if, tu executes et tu appuies sur YES, tu retourne dans le code, tu places ta souris sur la variable reponse et tu n'as plus qu'a recopier la valeur.
Commenter la réponse de cs_Nicko11
Messages postés
251
Date d'inscription
samedi 19 novembre 2005
Dernière intervention
2 novembre 2010
- 16 avril 2007 à 14:30
0
Merci
ok, je viens de relire calmement ta réponse, je valide
merci à tous !
Commenter la réponse de Tyrell2
Messages postés
1884
Date d'inscription
samedi 1 avril 2006
Dernière intervention
20 novembre 2007
- 16 avril 2007 à 14:31
0
Merci
Bonjour,

Personnellement je fais toujours comme ça:

If MsgBox("Voulez vous continuer?",vbYesNo,"Continuer?")=vbYes Then
  OUI appuye
 
Else
  NON appuye
 
End If
Commenter la réponse de chaibat05

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.