Opis wejścia
Zwraca otwarty strumień pliku wejściowego lub binarnego (String).
Składnia wejściowa
| 1 | Wejście(Numer, [#]Numer Pliku) |
Instrukcja Input zawiera 2 argumenty:
Numer: Liczba znaków do zwrócenia.
Numer pliku:Prawidłowy numer pliku.
Przykłady instrukcji wprowadzania Excel VBA
Aby przetestować instrukcję Input, utwórz plik tekstowy „test.txt” na dysku D. (D:\test.txt) Załóżmy, że zawartość pliku jest następująca.
| 123 | ABC1 2 3xy z |
Uruchom następujący kod.
| 1234567891011 | Sub Input_Fx_Example()Dim strContent As StringPrzyciemnij MyCharOtwórz „D:\test.txt” dla danych wejściowych jako nr 1 ' Otwórz plik.Do While Not EOF(1) ' Pętla do końca pliku.MyChar = Input(1, #1) ' Pobierz jeden znak.strContent = strContent & MyChar 'PętlaMsgBox strContentZamknij #1 ' Zamknij plik.Napis końcowy |
Wtedy wynik będzie następujący.
