VbYesNo
zelze
Messages postés
234
Date d'inscription
mardi 31 décembre 2002
Statut
Membre
Dernière intervention
30 juillet 2008
-
28 mai 2003 à 19:05
noel37400 Messages postés 3 Date d'inscription mercredi 26 décembre 2007 Statut Membre Dernière intervention 26 décembre 2007 - 2 janv. 2008 à 23:50
noel37400 Messages postés 3 Date d'inscription mercredi 26 décembre 2007 Statut Membre Dernière intervention 26 décembre 2007 - 2 janv. 2008 à 23:50
A voir également:
- Vba msgbox yes no
- Vbyesno vba - Meilleures réponses
- Msgbox vbyesno - Meilleures réponses
- Vbyesno vba - Forum Visual Basic 6
- Msgbox vbyesno - Forum Visual Basic
- MsgBox VBA excel - Forum VBA Office (Excel, Word ...)
- Msgbox en premier plan - Forum Visual Basic
- MSGbox avec 3 boutons - Forum Visual Basic 6
6 réponses
cs_DARKSIDIOUS
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Membre
Dernière intervention
4 mars 2013
130
28 mai 2003 à 19:25
28 mai 2003 à 19:25
Salut,
Ben c'est tout simple :
If MsgBox("Ok ou Non ?", vbYesNo + vbQuestion, "Ok ou NON ?" = vbYes Then
Msgbox "Ok"
Else
MsgBox "NON"
End If
DarK Sidious
[Responsable de la rubrique API et responsable VB du site www.ProgOtoP.com]
Ben c'est tout simple :
If MsgBox("Ok ou Non ?", vbYesNo + vbQuestion, "Ok ou NON ?" = vbYes Then
Msgbox "Ok"
Else
MsgBox "NON"
End If
DarK Sidious
[Responsable de la rubrique API et responsable VB du site www.ProgOtoP.com]
cs_DARKSIDIOUS
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Membre
Dernière intervention
4 mars 2013
130
28 mai 2003 à 19:27
28 mai 2003 à 19:27
Salut,
Ben c'est tout simple :
If MsgBox("Ok ou Non ?", vbYesNo + vbQuestion, "Ok ou NON ?" = vbYes Then
Msgbox "Ok"
Else
MsgBox "NON"
End If
DarK Sidious
[Responsable de la rubrique API et responsable VB du site www.ProgOtoP.com]
Ben c'est tout simple :
If MsgBox("Ok ou Non ?", vbYesNo + vbQuestion, "Ok ou NON ?" = vbYes Then
Msgbox "Ok"
Else
MsgBox "NON"
End If
DarK Sidious
[Responsable de la rubrique API et responsable VB du site www.ProgOtoP.com]
zelze
Messages postés
234
Date d'inscription
mardi 31 décembre 2002
Statut
Membre
Dernière intervention
30 juillet 2008
28 mai 2003 à 20:38
28 mai 2003 à 20:38
ouai c'est tout simple... Quand on le sait.
Sinon je te remercie de ton aide...
Sinon je te remercie de ton aide...
cs_DARKSIDIOUS
Messages postés
15814
Date d'inscription
jeudi 8 août 2002
Statut
Membre
Dernière intervention
4 mars 2013
130
28 mai 2003 à 21:03
28 mai 2003 à 21:03
Je ne voulais pas te vexer en disant que c'était tout simple ;-)
Je suis content d'avoir pu te venir en aide !
DarK Sidious
[Responsable de la rubrique API et responsable VB du site www.ProgOtoP.com]
Je suis content d'avoir pu te venir en aide !
DarK Sidious
[Responsable de la rubrique API et responsable VB du site www.ProgOtoP.com]
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
zelze
Messages postés
234
Date d'inscription
mardi 31 décembre 2002
Statut
Membre
Dernière intervention
30 juillet 2008
28 mai 2003 à 21:53
28 mai 2003 à 21:53
non t'intiéte tu m'a pas vexé !!!!
Je Dconé lol :big)
Aller @+ et Bon prog...
Je Dconé lol :big)
Aller @+ et Bon prog...
noel37400
Messages postés
3
Date d'inscription
mercredi 26 décembre 2007
Statut
Membre
Dernière intervention
26 décembre 2007
2 janv. 2008 à 23:50
2 janv. 2008 à 23:50
Salut,
moi je mets :
Sub nomdemacro()
toto = MsgBox("repondre oui ou non", vbYesNo) 'toto est la variable
If toto = 6 Then 'renvoi la valeur 6 pour le clic sur oui et 4 pour le clic sur non
uu = MsgBox("ok", vbOKOnly)
Else
uu = MsgBox("non", vbCritical)
End If
End Sub
Noel
moi je mets :
Sub nomdemacro()
toto = MsgBox("repondre oui ou non", vbYesNo) 'toto est la variable
If toto = 6 Then 'renvoi la valeur 6 pour le clic sur oui et 4 pour le clic sur non
uu = MsgBox("ok", vbOKOnly)
Else
uu = MsgBox("non", vbCritical)
End If
End Sub
Noel