MsgBox (Funktion)

Gilt für
Access für Microsoft 365 Access 2024 Access 2021 Access 2019 Access 2016

In einer Access-Desktopdatenbank zeigt die MsgBox-Funktion eine Meldung in einem Dialogfeld an, wartet, bis der Benutzer auf eine Schaltfläche klickt, und gibt einen Integer-Wert zurück, der angibt, auf welche Schaltfläche der Benutzer geklickt hat.

Syntax

MsgBox(prompt [, buttons ] [, title ] [, helpfile ] [, context ] )

Die Syntax der Funktion MsgBox weist die folgenden Argumente auf:

Argument Beschreibung
Eingabeaufforderung Erforderlich. Zeichenfolgenausdruck, der als Nachricht im Dialogfeld angezeigt wird. Die maximale Länge der Eingabeaufforderung beträgt ungefähr 1.024 Zeichen, abhängig von der Breite der verwendeten Zeichen. Wenn die Eingabeaufforderung aus mehr als einer Zeile besteht, können Sie die Zeilen mit einem Wagenrücklaufzeichen (Chr(13)), einem Zeilenvorschubzeichen (Chr(10)) oder einer Wagenrücklaufzeichenkombination (Chr(13) & Chr(10)) zwischen den einzelnen Zeilen trennen.
Schaltflächen 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 kein Wert angegeben wird, ist der Standardwert für Schaltflächen 0.
Titel Optional. Zeichenfolgenausdruck, der auf der Titelleiste des Dialogfelds angezeigt wird. Wenn Sie den Titel weglassen, wird der Anwendungsname in der Titelleiste platziert.
Hilfedatei Optional. Zeichenfolgenausdruck, der die Hilfedatei angibt, die verwendet wird, um kontextbezogene Hilfe für das Dialogfeld bereitzustellen. Wenn helpfile bereitgestellt wird, muss auch kontext angegeben werden.
Kontext Optional. Numerischer Ausdruck, der die Hilfekontextnummer angibt, die dem entsprechenden Hilfethema vom Autor der Hilfe zugewiesen wurde. Wenn Kontext angegeben wird, muss auch die Hilfedatei bereitgestellt werden.

Einstellungen

Die Einstellungen des Buttons-Argumentssind:

Konstante Wert Beschreibung
vbOKOnly 0 Zeigt nur die Schaltfläche OK an.
vbOKCancel 1 Zeigt die Schaltflächen OK und Abbrechen an.
vbAbortRetryIgnore 2 Zeigt die Schaltflächen Beenden, Wiederholen und Ignorieren an.
vbYesNoCancel 3 Zeigt die Schaltflächen Ja, Nein und Abbrechen an.
vbYesNo 4 Zeigt die Schaltflächen Ja und Nein an.
vbRetryCancel 5 Zeigt die Schaltflächen Wiederholen und Abbrechen an.
vbCritical 16 Zeigt das Symbol Wichtige Meldung an.
vbQuestion 32 Symbol "Warnungsabfrage " anzeigen.
vbExclamation 48 Symbol "Warnmeldung anzeigen".
vbInformation 64 Zeigt das Symbol Informationsmeldung an.
vbDefaultButton1 0 Erste Schaltfläche ist Standardschaltfläche.
vbDefaultButton2 256 Zweite Schaltfläche ist Standardschaltfläche.
vbDefaultButton3 512 Dritte Schaltfläche ist Standardschaltfläche.
vbDefaultButton4 768 Vierte Schaltfläche ist Standardschaltfläche.
vbApplicationModal 0 Anwendungsmodal. Der Benutzer muss auf das Meldungsfeld reagieren, bevor er in der aktuellen Anwendung weiterarbeiten kann.
vbSystemModal 4096 Systemmodal. Alle Anwendungen werden unterbrochen, bis der Benutzer auf das Meldungsfeld reagiert hat.
vbMsgBoxHelpButton 16384 Fügt dem Meldungsfeld die Schaltfläche "Hilfe" hinzu.
vbMsgBoxSetForeground 65536 Gibt das Fenster des Meldungsfelds als Vordergrundfenster an.
vbMsgBoxRight 524288 Text ist rechtsbündig.
vbMsgBoxRtlReading 1048576 Gibt an, dass der Text auf hebräischen und arabischen Systemen mit der Leserichtung von rechts nach links angezeigt werden muss.

Die erste Gruppe von Werten (0–5) beschreibt die Anzahl und den Typ der im Dialogfeld angezeigten Schaltflächen. die zweite Gruppe (16, 32, 48, 64) beschreibt den Symbolstil; die dritte Gruppe (0, 256, 512) bestimmt, welche Schaltfläche die Standardschaltfläche ist; und die vierte Gruppe (0, 4096) bestimmt die Modalität des Meldungsfelds. Wenn Sie Zahlen hinzufügen, um einen endgültigen Wert für das Argument buttons zu erstellen, verwenden Sie nur eine Zahl aus jeder Gruppe.

Hinweis

Diese Konstanten werden von Visual Basic for Applications angegeben. Daher können die Namen an jeder Stelle im Code anstelle der tatsächlichen Werte verwendet werden.

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 Die Hilfedatei als auch der Kontext bereitgestellt werden, kann der Benutzer F1 (Windows) oder HILFE (macOS) drücken, um das Hilfethema anzuzeigen, das dem Kontext entspricht. 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 ein Drücken der ESC-TASTE dieselbe Wirkung wie ein Klicken auf Abbrechen. Wenn das Dialogfeld die Schaltfläche Hilfe enthält, wird für das Dialogfeld eine kontextbezogene Hilfe zur Verfügung gestellt. Ein Wert wird aber erst zurückgegeben, wenn auf eine der anderen Schaltflächen geklickt wurde.

Hinweis

Um mehr als das erste benannte Argument anzugeben, müssen Sie MsgBox in einem Ausdruck verwenden. Wenn Sie einige Positionsargumente weglassen, müssen Sie das entsprechende Kommatrennzeichen einschließen.

Beispiel

Hinweis

Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic for Applications).

In diesem Beispiel wird die MsgBox-Funktion verwendet, um eine Meldung zu einem kritischen Fehler 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 davon ab, welche Schaltfläche der Benutzer ausgewählt hat. 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