Input-Funktion (Eingabe)

Hinweis : Die Funktion, die Methode, das Objekt oder die Eigenschaft, die bzw. das in diesem Thema erläutert wird, ist deaktiviert, falls der Ausdrucksdienst in Microsoft Jet im geschützten Modus (Sandkastenmodus) ausgeführt wird. In diesem Modus wird die Auswertung von potenziell unsicheren Ausdrücken verhindert. Weitere Informationen zum geschützten Modus erhalten Sie, wenn Sie in der Hilfe nach "Sandkastenmodus" suchen.

Gibt eine String-Datentyp zurück, die Zeichen aus einer Datei enthält, die im Eingabe- oder Binär-Modus geöffnet wird.

Syntax

Input(number, [# ] filenumber)

Die Input-Funktionssyntax verwendet die folgenden Argumente:

Argument

Beschreibung

number

Erforderlich. Jeder beliebige Numerischer Ausdruck, der die Anzahl der Zeichen angibt, die zurückgegeben werden sollen.

filenumber

Erforderlich. Jede gültige Dateinummer.


Hinweise

Daten, die mit der Input-Funktion gelesen werden, werden in der Regel mit Print # oder Put in eine Datei geschrieben. Verwenden Sie diese Funktion nur mit Dateien, die im Eingabe- oder im Binär-Modus geöffnet werden.

Die Input-Funktion gibt im Gegensatz zur Input #-Anweisung alle Zeichen, die sie liest, zurück, einschließlich Kommas, Wagenrückläufe, Zeilenvorschübe, Anführungszeichen und führende Leerzeichen.

Wenn Dateien im Binär-Modus geöffnet werden, wird beim Versuch, die Datei mithilfe der Eingabe-Funktion durchzulesen, bis EOF den Wert Wahr zurückgibt, ein Fehler generiert. Verwenden Sie die LOF- und Loc-Funktionen statt der EOF-Funktion, wenn Binärdateien mit der Input-Funktion gelesen werden, oder verwenden Sie Get, wenn Sie die EOF-Funktion verwenden.

Hinweis :  Verwenden Sie die InputB-Funktion für Bytedaten, die in Textdateien enthalten sind. Mit InputB gibt number die Anzahl der zurückzugebenden Bytes anstatt der Anzahl der zurückzugebenden Zeichen an.

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.

Dieses Beispiel verwendet die Input-Funktion, um jeweils ein Zeichen aus einer Datei zu lesen und im Direktfenster zu drucken. In diesem Beispiel wird vorausgesetzt, dass TESTFILE eine Textdatei mit einigen Zeilen Beispieldaten ist.

Dim MyChar
Open "TESTFILE" For Input As #1 ' Open file.
Do While Not EOF(1) ' Loop until end of file.
MyChar = Input(1, #1) ' Get one character.
Debug.Print MyChar ' Print to the Immediate window.
Loop
Close #1 ' Close file.
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!

×