Inhaltsverzeichnis
Eingabe Beschreibung
Gibt den offenen Stream einer Eingabe- oder Binärdatei (String) zurück.
Eingabesyntax
| 1 | Eingabe(Zahl, [#]Dateinummer) |
Die Input-Anweisung enthält 2 Argumente:
Nummer: Die Anzahl der zurückzugebenden Zeichen.
Dateinummer:Gültige Dateinummer.
Beispiele für Excel-VBA-Eingabeanweisungen
Um die Input-Anweisung zu testen, erstellen Sie eine Textdatei „test.txt“ auf Laufwerk D. (D:\test.txt) Angenommen, der Inhalt der Datei lautet wie folgt.
| 123 | ABC1 2 3xy z |
Bitte führen Sie den folgenden Code aus.
| 1234567891011 | Sub Input_Fx_Example()Dim strContent As StringDim MyCharÖffnen Sie "D:\test.txt" für Eingabe als #1 ' Datei öffnen.Do While Not EOF(1) ' Schleife bis zum Ende der Datei.MyChar = Input(1, #1) ' Hole ein Zeichen.strContent = strContent & MyChar 'SchleifeMsgBox strContentSchließen #1 ' Datei schließen.End Sub |
Dann sieht das Ergebnis wie folgt aus.
