MsgBox (Funktion)

<< Click to Display Table of Contents >>

MsgBox (Funktion)

MsgBox(Text [, Typ] [, Titel])

Zeigt ein Meldungsfenster an.

Der Rückgabewert zeigt an, welche Schaltfläche betätigt wurde, um das Meldungsfenster zu verlassen (siehe unten).

Text ist die anzuzeigende Zeichenkette.

Der optionale Parameter Typ bestimmt, welche Schaltflächen und welches Symbol im Meldungsfenster angezeigt werden (siehe unten). Die Standardeinstellung ist: nur OK-Schaltfläche, kein Symbol.

Der optionale Parameter Titel bestimmt, welcher Text in der Titelleiste angezeigt wird (Standardwert: leer).

Siehe auch: Dialog, InputBox

Zulässige Werte für den Parameter "Typ":

Symbolische Konstante

Wert

Bedeutung

MB_OK

0

Nur OK-Schaltfläche anzeigen

MB_OKCANCEL

1

Schaltflächen OK und Abbrechen anzeigen

MB_ABORTRETRYIGNORE

2

Schaltflächen Abbrechen, Wiederholen, Ignorieren anzeigen

MB_YESNOCANCEL

3

Schaltflächen Ja, Nein, Abbrechen anzeigen

MB_YESNO

4

Schaltflächen Ja und Nein anzeigen

MB_RETRYCANCEL

5

Schaltflächen Wiederholen und Abbrechen anzeigen

MB_ICONSTOP

16

Zeigt ein Symbol für Fehlermeldungen an.

MB_ICONQUESTION

32

Zeigt ein Symbol für Abfragen an.

MB_ICONEXCLAMATION

48

Zeigt ein Symbol für Hinweismeldungen an.

MB_ICONINFORMATION

64

Zeigt ein Symbol für Informationsmeldungen an.

MB_DEFBUTTON1

0

Macht die erste Schaltfläche zur Standardschaltfläche.

MB_DEFBUTTON2

256

Macht die zweite Schaltfläche zur Standardschaltfläche.

MB_DEFBUTTON3

512

Macht die dritte Schaltfläche zur Standardschaltfläche.

MB_APPLMODAL

0

Das Meldungsfenster ist applikationsmodal. Die aktuelle Anwendung nimmt also so lange keine Eingaben an, bis der Anwender das Meldungsfenster geschlossen hat.

MB_SYSTEMMODAL

4096

Das Meldungsfenster ist systemmodal. Das gesamte System nimmt so lange keine Eingaben an, bis der Anwender das Meldungsfenster geschlossen hat (nur für kritische Fehler verwenden!).

Aus jeder der vier obigen Gruppen kann ein Wert ausgewählt werden. Kombinieren Sie die einzelnen Konstanten durch Addition.

Rückgabewerte der MsgBox-Funktion

Der Rückgabewert dieser Funktion gibt an, welche Schaltfläche zum Verlassen des Meldungsfensters betätigt wurde:

Symbolische Konstante

Wert

Bedeutung

IDOK

1

OK-Schaltfläche

IDCANCEL

2

Abbrechen-Schaltfläche, außer bei MB_ABORTRETRYIGNORE

IDABORT

3

Abbrechen-Schaltfläche bei MB_ABORTRETRYIGNORE

IDRETRY

4

Wiederholen-Schaltfläche

IDIGNORE

5

Ignorieren-Schaltfläche

IDYES

6

Ja-Schaltfläche

IDNO

7

Nein-Schaltfläche

Beispiel:

Dieses Beispiel benutzt MsgBox, um eine Sicherheitsabfrage anzuzeigen.

Sub Main

 Dim DgDef, Msg, Response, Title

 Title = "MsgBox-Beispiel"

 Msg = "Möchten Sie fortfahren?"

 DgDef = MB_YESNOCANCEL + MB_ICONQUESTION + MB_DEFBUTTON3

 Response = MsgBox(Msg, DgDef, Title)

 If Response = IDYES Then

         Msg = "Sie haben Ja gewählt."

 ElseIf Response = IDCANCEL Then

         Msg = "Sie haben Abbrechen gewählt."

 Else

         Msg = "Sie haben Nein gewählt."

 End If

 MsgBox Msg

End Sub