In einer Access-Desktopdatenbank zeigt die MsgBox Funktion eine Meldung in einem Dialogfeld an, wartet, bis der Benutzer eine Schaltfläche ausgewählt hat, und gibt eine Integer zurück, die angibt, welche Schaltfläche der Benutzer ausgewählt hat.
Syntax
MsgBox(prompt[, buttons][, title][, helpfile][, context])
Die MsgBox Funktionssyntax weist die folgenden Argumente auf:
| Argument | Beschreibung |
|---|---|
prompt |
Erforderlich. Zeichenfolgenausdruck, der als Nachricht im Dialogfeld angezeigt wird. Die maximale Länge von prompt beträgt etwa 1.024 Zeichen, abhängig von der Breite der verwendeten Zeichen. Wenn prompt mehr als eine Zeile aufweist, können Sie die Zeilen trennen, indem Sie ein Wagenrücklaufzeichen (Chr(13)), ein Zeilenvorschubzeichen (Chr(10)) oder eine Wagenrücklauf-Zeilenvorschub-Kombination (Chr(13) & Chr(10)) zwischen den einzelnen Zeilen trennen. |
buttons |
Optional. Numerischer Ausdruck, der die Summe der Werte darstellt, die die Anzahl und den Typ der anzuzeigenden Schaltflächen, die zu verwendende Symbolart, die Identität der Standardschaltfläche und die Modalität des Meldungsfelds angeben. Wenn nicht angegeben, ist 0der Standardwert für buttons . |
title |
Optional. Zeichenfolgenausdruck, der auf der Titelleiste des Dialogfelds angezeigt wird. Wenn Sie weglassen title, wird der Anwendungsname in der Titelleiste angezeigt. |
helpfile |
Optional. Zeichenfolgenausdruck, der die Hilfedatei angibt, die verwendet wird, um kontextbezogene Hilfe für das Dialogfeld bereitzustellen. Wenn helpfile angegeben ist, context muss ebenfalls bereitgestellt werden. |
context |
Optional. Numerischer Ausdruck, der die Hilfekontextnummer angibt, die dem entsprechenden Hilfethema vom Autor der Hilfe zugewiesen wurde. Wenn context angegeben ist, helpfile muss ebenfalls bereitgestellt werden. |
Einstellungen
Die buttons Argumenteinstellungen sind:
| Konstante | Wert | Beschreibung |
|---|---|---|
vbOKOnly |
0 |
Nur "OK " anzeigen. |
vbOKCancel |
1 |
Zeigt OK und Abbrechen an. |
vbAbortRetryIgnore |
2 |
Anzeigen von Abbruch, Wiederholen und Ignorieren. |
vbYesNoCancel |
3 |
Zeigen Sie Ja, Nein und Abbrechen an. |
vbYesNo |
4 |
Anzeigen von "Ja " und "Nein". |
vbRetryCancel |
5 |
Anzeigen von "Wiederholen " und "Abbrechen". |
vbCritical |
16 |
Zeigt das Symbol Kritische Nachricht an. |
vbQuestion |
32 |
Zeigt das Symbol Warnungsabfrage an. |
vbExclamation |
48 |
Zeigt das Symbol "Warnmeldung" an. |
vbInformation |
64 |
Zeigt das Symbol "Informationsmeldung " an. |
vbDefaultButton1 |
0 |
Legen Sie die erste Schaltfläche als Standard fest. |
vbDefaultButton2 |
256 |
Legen Sie die zweite Schaltfläche als Standard fest. |
vbDefaultButton3 |
512 |
Legen Sie die dritte Schaltfläche als Standard fest. |
vbDefaultButton4 |
768 |
Legen Sie die vierte Schaltfläche als Standard fest. |
vbApplicationModal |
0 |
Modale Anwendung. Der Benutzer muss auf das Meldungsfeld antworten, bevor er die Arbeit in der aktuellen Anwendung fortsetzen kann. |
vbSystemModal |
4096 |
Modales System. Alle Anwendungen werden angehalten, bis der Benutzer auf das Meldungsfeld antwortet. |
vbMsgBoxHelpButton |
16384 |
Fügen Sie dem Meldungsfeld eine Hilfeschaltfläche hinzu. |
VbMsgBoxSetForeground |
65536 |
Geben Sie das Meldungsfeldfenster als Vordergrundfenster an. |
vbMsgBoxRight |
524288 |
Richten Sie den Text rechts aus. |
vbMsgBoxRtlReading |
1048576 |
Lassen Sie den Text mit Rechts-nach-links-Leserichtung auf hebräischen und arabischen Systemen erscheinen. |
Die erste Gruppe von Werten (0 bis 5) beschreibt die Anzahl und den Typ der schaltflächen, die im Dialogfeld angezeigt werden. Die zweite Gruppe (16, , 4832, ) 64beschreibt den Symbolstil. Die dritte Gruppe (0, 256, 512) bestimmt, welche Schaltfläche die Standardschaltfläche ist. Die vierte Gruppe (0, 4096) bestimmt die Modalität des Meldungsfelds. Wenn Sie Zahlen hinzufügen, um einen endgültigen Wert für das buttons Argument zu erstellen, verwenden Sie nur eine Zahl aus jeder Gruppe.
Hinweis
Diese Konstanten werden von Visual Basic for Applications angegeben. Daher können Sie die Namen an einer beliebigen Stelle im Code anstelle der tatsächlichen Werte verwenden.
Rückgabewerte
| Konstante | Wert | Beschreibung |
|---|---|---|
vbOK |
1 |
OK |
vbCancel |
2 |
Abbrechen |
vbAbort |
3 |
Beenden |
vbRetry |
4 |
Wiederholen |
vbIgnore |
5 |
Ignorieren |
vbYes |
6 |
Yes |
vbNo |
7 |
No |
Hinweise
Wenn sowohl als context auch helpfile angegeben werden, kann der Benutzer F1 in Windows oder Hilfe in macOS drücken, um das Hilfethema anzuzeigen, das mit übereinstimmtcontext. Einige Hostanwendungen, z. B. Microsoft Excel, fügen dem Dialogfeld auch automatisch eine Hilfeschaltfläche hinzu.
Wenn im Dialogfeld die Schaltfläche Abbrechen angezeigt wird, hat das Drücken von ESC die gleiche Auswirkung wie die Auswahl von Abbrechen. Wenn das Dialogfeld die Schaltfläche Hilfe enthält, wird für das Dialogfeld eine kontextbezogene Hilfe zur Verfügung gestellt. Es wird jedoch kein Wert zurückgegeben, bis der Benutzer eine der anderen Schaltflächen auswählt.
Hinweis
Um mehr als das erste benannte Argument anzugeben, müssen Sie in einem Ausdruck verwenden MsgBox . Wenn Sie einige Positionsargumente weglassen, müssen Sie das entsprechende Kommatrennzeichen einschließen.
Beispiel
Hinweis
Im folgenden Beispiel wird die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic for Applications) veranschaulicht.
In diesem Beispiel wird die MsgBox -Funktion verwendet, um eine kritische Fehlermeldung in einem Dialogfeld mit den Schaltflächen Ja und Nein anzuzeigen. Die Schaltfläche Nein wird als Standardantwort angegeben. Der von der MsgBox Funktion zurückgegebene Wert hängt von der Schaltfläche ab, die der Benutzer auswählt. In diesem Beispiel wird davon ausgegangen, dass DEMO.HLP eine Hilfedatei ist, die ein Thema mit einer Hilfekontextnummer enthält, die gleich ist 1000.
Dim Msg, Style, Title, Help, Ctxt, Response, MyString
Msg = "Do you want to continue?"
Style = vbYesNo + vbCritical + vbDefaultButton2
Title = "MsgBox Demonstration"
Help = "DEMO.HLP"
Ctxt = 1000
Response = MsgBox(Msg, Style, Title, Help, Ctxt)
If Response = vbYes Then ' User chose Yes.
MyString = "Yes" ' Perform some action.
Else ' User chose No.
MyString = "No" ' Perform some action.
End If