MsgBox(tekst[, iconen en knoppen] [, titel] [, helpbestand, context])
Je kan MsgBox ook gebruiken om iets te vragen aan de gebruiker. Daarvoor laat je een
aantal knoppen zien (Ja, Nee, Annuleren, OK, Opnieuw).
Omdat je die reactie van de gebruiker moet kennen, moet je hiervoor MsgBox als functie
gebruiken. De syntaxis is niet onbekend:
De volgende knoppencombinaties zijn mogelijk:
vbOKCancel (OK en Annuleren)
vbYesNo (Ja en nee)
vbYesNoCancel (Ja, nee en annuleren)
vbRetryCancel (Opnieuw en Annuleren)
Je kan ook de iconen gebruiken:
vbCritical
vbQuestion
vbExclamation
vbInformation
Om knoppen en iconen te gebruiken, kan je de twee gewoon optellen. vbCritical + vbYesNo toont een uitroepteken en de knoppen Ja en
Nee.
Je kan een knop de focus geven met vbDefaultButton1, vbDefaultButton2, vbDefaultButton3,
vbDefaultButton4.
Om iets te doen met de knop waarop geklikt is, moet je gebruik maken van voorwaarden. Bijvoorbeeld:
If MsgBox("Klik op Ja of Nee", vbYesNo) = vbYes Then
MsgBox "Je hebt op Ja geklikt"
Else
MsgBox "Je hebt op Nee geklikt"
End If
Je kan ook gebruik maken van Select Case. Dat is aangewezen als er méér dan twee
knoppen zijn.
Select Case MsgBox("Wil je opslaan voor het
afsluiten?",vbYesNoCancel,"Document gewijzigd")
Case vbYes
Sla het document op en sla op
Case vbNo
Stop het programma
Case vbCancel
Stop het afsluiten - doe niets
End if