In einer Access-Desktopdatenbank zeigt die MsgBox Funktion eine Meldung in einem Dialogfeld an, wartet, bis der Benutzer eine Schaltfläche auswählt, und gibt eine zurück Integer , 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 beträgt prompt etwa 1024 Zeichen, abhängig von der Breite der verwendeten Zeichen. Wenn prompt über mehr als eine Zeile verfügt, können Sie die Zeilen trennen, indem Sie zwischen jeder Zeile ein Wagenrücklaufzeichen (Chr(13)), ein Zeilenvorschubzeichen (Chr(10)) oder eine Wagenrücklauf-Zeilenvorschub-Kombination (Chr(13) & Chr(10)) verwenden. |
buttons |
Optional. Numerischer Ausdruck, bei dem es sich um die Summe der Werte handelt, die die Anzahl und den Typ der anzuzeigenden Schaltflächen, den zu verwendenden Symbolstil, die Identität der Standardschaltfläche und die Modalität des Meldungsfelds angeben. Wenn er ausgelassen wird, ist 0der Standardwert für buttons . |
title |
Optional. Zeichenfolgenausdruck, der auf der Titelleiste des Dialogfelds angezeigt wird. Wenn Sie diesen Befehl titleweglassen, 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, context müssen sie auch angegeben werden. |
context |
Optional. Numerischer Ausdruck, der die Hilfekontextnummer angibt, die dem entsprechenden Hilfethema vom Autor der Hilfe zugewiesen wurde. Wenn context angegeben, helpfile müssen sie auch angegeben werden. |
Einstellungen
Die buttons Argumenteinstellungen sind:
| Konstante | Wert | Beschreibung |
|---|---|---|
vbOKOnly |
0 |
Anzeige nur OK . |
vbOKCancel |
1 |
" OK " anzeigen und "Abbrechen" auswählen. |
vbAbortRetryIgnore |
2 |
Anzeigen von Abbruch, Wiederholen und Ignorieren. |
vbYesNoCancel |
3 |
Anzeigen von "Ja", "Nein" und "Abbrechen". |
vbYesNo |
4 |
Anzeigen von Ja und Nein. |
vbRetryCancel |
5 |
Wiederholen und Abbrechen anzeigen. |
vbCritical |
16 |
Symbol für kritische Meldung anzeigen. |
vbQuestion |
32 |
Symbol für Warnabfrage anzeigen. |
vbExclamation |
48 |
Symbol für Warnmeldung anzeigen. |
vbInformation |
64 |
Symbol für Informationsmeldung anzeigen. |
vbDefaultButton1 |
0 |
Legen Sie die erste Schaltfläche als Standard fest. |
vbDefaultButton2 |
256 |
Legen Sie die zweite Taste 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 |
Anwendungsmodal. Der Benutzer muss auf das Meldungsfeld antworten, bevor er die Arbeit in der aktuellen Anwendung fortsetzt. |
vbSystemModal |
4096 |
Systemmodal. Alle Anwendungen werden angehalten, bis der Benutzer auf das Meldungsfeld antwortet. |
vbMsgBoxHelpButton |
16384 |
Fügen Sie eine Hilfe-Schaltfläche zum Meldungsfeld hinzu. |
VbMsgBoxSetForeground |
65536 |
Geben Sie das Meldungsfenster als Vordergrundfenster an. |
vbMsgBoxRight |
524288 |
Rechtsbündiges Ausrichten des Texts. |
vbMsgBoxRtlReading |
1048576 |
Gestalten Sie den Text in hebräischen und arabischen Systemen mit Lesevorgang von rechts nach links angezeigt. |
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, 32, 4864, ) beschreibt den Symbolstil. Die dritte Gruppe (0, 256512, ) bestimmt, welche Schaltfläche die Standardeinstellung ist. Die vierte Gruppe (0, 4096) bestimmt die Modalität des Meldungsfelds. Wenn Sie Zahlen addieren, 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 kannst du die Namen an beliebiger 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 beide helpfilecontext und bereitgestellt werden, kann der Benutzer F1 in Windows oder Hilfe in macOS drücken, um das entsprechende contextHilfethema anzuzeigen. Einige Hostanwendungen, z. B. Microsoft Excel, fügen dem Dialogfeld auch automatisch eine Hilfeschaltfläche hinzu.
Wenn im Dialogfeld eine Schaltfläche "Abbrechen" angezeigt wird, hat das Drücken von ESC die gleiche Wirkung wie das Auswählen 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
Sie müssen in einem Ausdruck verwenden, um MsgBox mehr als das erste benannte Argument anzugeben. Wenn Sie einige Positionsargumente weglassen, müssen Sie das entsprechende Kommatrennzeichen einschließen.
Beispiel
Hinweis
Das folgende Beispiel zeigt, wie Sie diese Funktion in einem Visual Basic for Applications (VBA)-Modul verwenden.
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 ist 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 es sich um eine Hilfedatei handelt, die ein Thema mit der Hilfekontextnummer enthält 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