Quelques exemples
If MsgBox("Appuyez sur le bouton OK afin de continuer", vbOKCancel) = vbCancel Then output "Annuler" else output "OK" end if
Select Case Msgbox("Êtes-vous certain?",vbYesNo) Case vbYes Output "Oui" Case vbNo Output "Non" End Select
If MsgBox("Êtes-vous certain?", vbQuestion) = vbOK Then Output "OK" End If
dim resultat resultat = MsgBox("Mon message", vbYesNoCancel, "Mon titre") if resultat = vbYes Then output "Oui" elseif resultat = vbCancel Then output "Annuler" elseif resultat = vbNo Then output "Non" End If
if msgbox("Êtes-vous certains de vouloir continuer?", vbexclamation+vbokcancel, "Mon titre") = vbcancel then output "Annuler" else output "OK" end if
Affichage du fichier d’aide
Si vous ne connaissez pas le numéro du contexte, indiquez la valeur « 0 ». Ceci permettra d’ouvrir le fichier d’aide et que ce soit à l’utilisateur d’entreprendre la recherche.
Const cstrHlp = "C:Program FilesSybasePowerAMC 16poweramc.chm" Dim strMessage strMessage = MsgBox("Affichage du document d'aide", vbOKCancel + vbQuestion + _ vbDefaultButton1 + vbMsgBoxHelpButton, "Affichage du document d'aide", cstrHlp, 0)