Gültig für Windows und Windows CE
Die Funktion "MessageBox" oder "MsgBox" zeigt ein Meldungsfenster an. Das Meldungsfenster enthält eine Meldung und einen Titel sowie eine beliebige Kombination der vordefinierten Schaltflächen, die durch den Parameter "style" beschrieben werden.
Anstelle von "MessageBox" können Sie auch "MsgBox" zum Aufrufen dieser Funktion verwenden.
Funktionssyntax:
MessageBox(message as String, title as String, style as Integer) as Integer
MessageBox(message as String, title as String) as Integer
MessageBox(message as String, style as Integer) as Integer
MessageBox(message as String) as Integer
Gibt die Zeichenfolge an, die die anzuzeigende Meldung enthält.
Kennzeichnet eine optionale Zeichenfolge, die den Titel des Meldungsfeldes enthält.
Standard: DMS
Kennzeichnet eine optionale Ganzzahl, die den Inhalt und das Verhalten des Meldungsfeldes festlegt. Für den Parameter "style" können folgende vordefinierte Konstanten verwendet werden:
Fügt Feld mit Schaltfläche "OK" (Standard) hinzu
Fügt Feld mit Schaltflächen "OK" und "Abbrechen" hinzu
Fügt Feld mit Schaltflächen "Ja" und "Nein" hinzu
Fügt Feld mit Schaltflächen "Wiederholen" und "Abbrechen" hinzu
Fügt Feld mit Schaltflächen "Ja", "Nein" und "Abbrechen" hinzu
Fügt Feld mit Schaltflächen "Abbrechen", "Wiederholen" und "Ignorieren" hinzu
Konstanten für die MessageBox-Modalität
Standardmäßig muss der Benutzer auf das Meldungsfeld reagieren, bevor er im aktuellen Fenster weiterarbeiten kann. Er kann jedoch in Fenster anderer Anwendungen wechseln und darin arbeiten.
Alle Anwendungen sind vorübergehend ausgesetzt, bis der Benutzer auf die Meldung reagiert hat. Systemgebundene Meldungsfenster benachrichtigen den Benutzer über schwere, potenziell schädliche Fehler, die eine sofortige Benutzerreaktion erfordern.
Konstanten für MessageBox-Symbole
Der Standardwert ist wie folgt: Es wird kein Symbol angezeigt.
Fügt ein Ausrufezeichen im Meldungsfeld hinzu
Fügt ein "i" in einem Kreis im Meldungsfeld hinzu
Fügt ein Fragezeichen im Meldungsfeld hinzu
Fügt ein Stopp-Symbol (weißes "X" in einem roten Kreis) im Meldungsfeld hinzu
Konstanten für MessageBox-Standardschaltflächen
Der Standardwert ist wie folgt: Die erste Schaltfläche dient als Standard.
Die zweite Schaltfläche dient als Standard.
Die dritte Schaltfläche dient als Standard.
Andere Konstanten
Zeigt das Meldungsfeld im Vordergrund an. Wenn dies nicht angegeben wird, bleibt das aktuelle Vordergrundfenster weiterhin im Vordergrund.
Sie können eine beliebige Konstante einer Gruppe mit einer anderen Konstante einer anderen Gruppe kombinieren. Wenn beispielsweise ein Meldungsfeld mit den Schaltflächen "Abbrechen", "Wiederholen" und "Ignorieren" (Standard) sowie ein Beendigungssymbol angezeigt werden soll und alle Anwendungen bis zur Reaktion des Benutzers ausgesetzt werden sollen, verwenden Sie folgende Art von Code:
MB_ABORTRETRYIGNORE + MB_DEFBUTTON3 + MB_ICONSTOP + MB_SYSTEMMODAL
Wenn der Parameter "style" nicht angegeben wird, wird MB_OK verwendet, so dass das Meldungsfenster lediglich die Schaltfläche "OK" enthält.
Wenn nicht genügend Arbeitsspeicher verfügbar ist, um das Meldungsfeld zu erstellen, gibt die Funktion den Wert null zurück. Andernfalls wird vom Meldungsfeld einer der folgenden Schaltflächenwerte zurückgegeben:
Wert 1: Die Schaltfläche "OK" wurde betätigt.
Wert 2: Die Schaltfläche "Abbrechen" (oder die ESC-Taste) wurde betätigt.
Wert 3: Die Schaltfläche "Abbrechen" wurde betätigt.
Wert 4: Die Schaltfläche "Wiederholen" wurde betätigt.
Wert 5: Die Schaltfläche "Ignorieren" wurde betätigt.
Wert 6: Die Schaltfläche "Ja" wurde betätigt.
Wert 7: Die Schaltfläche "Nein" wurde betätigt.
Beispiel:
In diesem Beispiel wird der Benutzer gefragt, ob eine Sicherungskopie der Datei "config.sys" erstellt werden soll und diese bei Bedarf erstellt.
Dim OutStr as string
Dim Question as string
Question="Soll eine Sicherungskopie der Datei 'config.sys' erstellt werden?"
if MessageBox(Question,MB_YESNO)=IDYES then
Src="C:\CONFIG.SYS"
Dst="C:\CONFIG.BAK"
if CopyFile(Src,Dst,TRUE) then MessageBox("CONFIG.BAK wurde erstellt.")
end if
|
Copyright © 2014 CA Technologies.
Alle Rechte vorbehalten.
|
|