Est ce que je peux coder les commandes "Ok" et "Cancel" de MsgBox.Merci d'avance

Signaler
Messages postés
63
Date d'inscription
mercredi 2 mars 2005
Statut
Membre
Dernière intervention
3 juin 2005
-
Messages postés
96
Date d'inscription
jeudi 10 juin 2004
Statut
Membre
Dernière intervention
22 mai 2007
-
BGM

2 réponses

Messages postés
3140
Date d'inscription
vendredi 14 mai 2004
Statut
Membre
Dernière intervention
11 mars 2019
29
Const vbOKCANCEL = 1 ' OK and Cancel buttons
Const vbABORTRETRYIGNORE = 2 ' Abort, Retry, and Ignore buttons
Const vbYESNOCANCEL = 3 ' Yes, No, and Cancel buttons
Const vbYESNO = 4 ' Yes and No buttons
Const vbICONSTOP = 16 ' Critical message
Const vbICONQUESTION = 32 ' Warning query
Const vbICONEXCLAMATION = 48 ' Warning message
Const vbICONINFORMATION = 64 ' Information message
Const vbDEFBUTTON2 = 256 ' Second button is default

Const vbOK = 1 ' OK button pressed
Const vbCANCEL = 2 ' Cancel button pressed
Const vbABORT = 3 ' Abort button pressed
Const vbRETRY = 4 ' Retry button pressed
Const vbIGNORE = 5 ' Ignore button pressed
Const vbYES = 6 ' Yes button pressed
Const vbNo = 7 ' No button pressed

Daniel
Messages postés
96
Date d'inscription
jeudi 10 juin 2004
Statut
Membre
Dernière intervention
22 mai 2007

dim Reponse as vbmsgboxresult
Reponse = msgbox("Mon message",vbyesnocancel + vbquestion,"MonTitre")
select case Reponse
case vbyes
...
case vbno
...
case vbcancel
...
end select

Ok?

Pierre Fauconnier