Spisie treści
Opis wejścia liniowego
Odczytuje pojedynczy wiersz z sekwencyjnego pliku Open i przypisuje go do ciągu.
Składnia wejścia liniowego
| 1 | Wejście liniowe #FileNumber, VarName |
Instrukcja Line Input zawiera 2 argumenty:
Numer pliku: Dowolny prawidłowy numer pliku.
Nazwa zmiennej: Prawidłowa nazwa zmiennej Varient lub String.
Przykłady instrukcji Excel VBA Line Input
Aby przetestować instrukcję wprowadzania wiersza, 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.
| 12345678910111213 | Sub LineInput_Example()Dim strLine jako ciągDim strContent As StringOtwó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.Line Input #1, strLine ' Wczytaj wiersz do zmiennej.strContent = strContent & strLinePętlaZamknij #1 ' Zamknij plik.MsgBox strContentNapis końcowy |
Wtedy wynik będzie następujący.
