MsgBox-Funktion

Zeigt eine Meldung in einem Dialogfeld an, wartet, bis der Benutzer auf eine Schaltfläche klickt, und gibt einen Wert vom Typ Integer zurück, der angibt, auf welche Schaltfläche der Benutzer geklickt hat.

Syntax

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

Die Syntax der MsgBox-Funktion enthält die folgenden Argument:

Argument

Beschreibung

prompt

Erforderlich. Zeichenfolgenausdruck, der als Meldung im Dialogfeld angezeigt wird. Die maximale Länge von prompt beträgt je nach der Breite der verwendeten Zeichen etwa 1024 Zeichen. Wenn prompt aus mehreren Zeilen besteht, können die Zeilen durch ein Zeilenumbruchzeichen (Chr(13)), ein Zeilenvorschubzeichen (Chr(10)) oder eine Kombination aus Zeilenumbruch- und Zeilenvorschubzeichen (Chr(13) & Chr(10)) zwischen den Zeilen getrennt werden.

buttons

Optional. Numerischer Ausdruck, der die Summe der Werte darstellt, die die Anzahl und den Typ der anzuzeigenden Schaltflächen, die Art des zu verwendenden Symbols, die Standardschaltfläche sowie die Bindung des Meldungsfelds angibt. Der Standardwert für buttons ist 0, wenn dieses Argument nicht angegeben wird.

title

Optional. Zeichenfolgenausdruck, der in der Titelleiste des Dialogfelds angezeigt wird. Wenn Sie title nicht angeben, wird der Name der Anwendung in der Titelleiste angezeigt.

helpfile

Optional. Zeichenfolgenausdruck, der die Hilfedatei angibt, die verwendet werden soll, um für das Dialogfeld eine kontextbezogene Hilfe bereitzustellen. Wenn helpfile angegeben wird, muss auch context angegeben werden.

context

Optional. Numerischer Ausdruck, der die Hilfekontextnummer darstellt, die dem entsprechenden Hilfethema vom Autor der Hilfe zugeordnet wurde. Wenn context angegeben wird, muss auch helpfile angegeben werden.


Einstellungen

Für das Argumentbuttons werden folgende Einstellungen verwendet:

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

Zeigt das Symbol Warnmeldung     an.

vbExclamation

48

Zeigt das Symbol Warnmeldung     an.

vbInformation

64

Zeigt das Symbol Informationen 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

Anwendungsgebunden. Der Benutzer muss auf das Meldungsfeld reagieren, bevor er das Verwenden der aktuellen Anwendung fortsetzen kann.

vbSystemModal

4096

Systemgebunden. Alle Anwendungen werden unterbrochen, bis der Benutzer auf das Meldungsfeld reagiert.

vbMsgBoxHelpButton

16384

Fügt dem Meldungsfeld die Schaltfläche Hilfe hinzu.

VbMsgBoxSetForeground

65536

Gibt das Fenster des Meldungsfelds als Vordergrundfenster an.

vbMsgBoxRight

524288

Text wird rechts ausgerichtet.

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 die Symbolart. Die dritte Gruppe (0, 256, 512) legt die Standardschaltfläche fest. Die vierte Gruppe (0, 4096) legt fest, in welcher Form das Meldungsfeld gebunden ist. Verwenden Sie beim Addieren der Zahlen zu einem Gesamtwert für das Argument buttons nur eine Zahl aus jeder Gruppe.

Hinweis : Die folgenden Konstante werden von Visual Basic für Applikationen angegeben. Daher können die Namen an beliebigen Stellen 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

Ja

vbNo

7

Nein


Hinweise

Wenn sowohl helpfile als auch context angegeben werden, kann der Benutzer F1 (Windows) oder HILFE (Macintosh) drücken, um das Hilfethema zum entsprechenden Kontext anzuzeigen. Einige Hostanwendung wie Microsoft Office Excel 2007 fügen dem Dialogfeld die Schaltfläche Hilfe automatisch hinzu.

Wenn im Dialogfeld die Schaltfläche Abbrechen angezeigt wird, hat das Drücken der Taste ESC dieselbe Wirkung wie das 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 wird.

Hinweis : Wenn Sie außer dem ersten benannten Argument weitere Argumente angeben möchten, müssen SieMsgBox in einem Ausdruck angeben. Wenn Sie einige Argument mit einer bestimmten Position nicht angeben möchten, müssen Sie das entsprechende Komma als Trennzeichen einschließen.

Beispiel

Hinweis : Die folgenden Beispiele zeigen die Verwendung dieser Funktion in einem VBA-Modul (Visual Basic für Applikationen). Wenn Sie weitere Informationen zum Arbeiten mit VBA wünschen, wählen Sie Entwicklerhilfe in der Dropdownliste neben Suchen, und geben Sie einen oder mehrere Begriffe in das Suchfeld ein.

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 ist von der vom Benutzer ausgewählten Schaltfläche abhängig. Für dieses Beispiel wird vorausgesetzt, dass DEMO.HLP eine Hilfedatei ist, die ein Thema mit der Hilfekontextnummer 1000 enthält.

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
Teilen Facebook Facebook Twitter Twitter E-Mail E-Mail

War diese Information hilfreich?

Sehr gut. Noch anderes Feedback?

Was können wir verbessern?

Vielen Dank für Ihr Feedback!

×