Gültig für Windows und Windows CE
Mit Hilfe der Funktion "InputBox" wird ein Meldungsfenster erstellt, angezeigt und bedient. Das Meldungsfeld besteht aus einer von der Anwendung definierten Aufforderung, einem Titel, einem Textfeld mit einem von der Anwendung definierten Standardwert sowie den Schaltflächen "OK" und "Abbrechen".
Diese Funktion hat das folgende Format:
InputBox( prompt as String, title as String, default as String) as Boolean
Gibt die anzuzeigende Eingabeaufforderung an.
Legt den Titel des Meldungsfeldes fest.
Gibt die Standardeingabe für die Eingabeaufforderung an. Wenn "default" keine Variable ist, tritt ein Syntaxfehler auf.
Hinweis: Das Eingabefeld wird NICHT im Vordergrund angezeigt.
Nach Auswahl der Schaltfläche "OK" gibt die Funktion den Wert TRUE zurück und kopiert den Inhalt des Textfeldes in die Standardvariable. Nach Auswahl der Schaltfläche "Abbrechen" gibt die Funktion den Wert FALSE zurück und belässt die Standardvariable unverändert.
Beispiel:
Dieses Beispiel demonstriert die Verwendung von "InputBox".
Dim TargetPath, Question as string
TargetPath=WindowsDir
Question="Geben Sie das Installationsverzeichnis an."
if InputBox(Question,"Installation",TargetPath) then
' Place code for actual installation here...
MessageBox("Installation abgeschlossen")
else
MessageBox("Installation abgebrochen")
End if
End:
|
Copyright © 2014 CA Technologies.
Alle Rechte vorbehalten.
|
|