Шаг 31 - Инструкция Line Input #

Читает строку из открытого последовательного файла и присваивает ее переменной типа String.

Line Input #номерФайла, имяПеременной

Параметры
номерФайла
Обязательный. Любой допустимый номер файла.
имяПеременной
Обязательный. Допустимое имя переменной типа Variant или String.

Замечания
Данные, считываемые с помощью инструкции Line Input #, обычно записываются в файл с помощью инструкции Print #.
Инструкция Line Input # последовательно считывает из файла по одному символу до тех пор, пока не встретит символ возврата каретки (Chr(13)) или комбинацию символов возврата каретки и перевода строки (Chr(13) + Chr(10)). Когда считанная строка присваивается переменной, символы возврата каретки и конца строки отбрасываются.

Пример

В данном примере инструкция Line Input # используется для чтения строки из последовательного файла и присвоения ее переменной. Предположим, что текстовый файл TESTFILE существует и содержит несколько строк текста.

Dim TextLine
Open "TESTFILE" For Input As #1		' Открывает файл.
Do While Not EOF(1)			' Цикл до конца файла.
	Line Input #1, TextLine		' Читает строку в переменную.
	Debug.Print TextLine		' Выводит в окно "Отладка".
Loop
Close #1				' Закрывает файл.

Предыдущий Шаг | Следующий Шаг | Оглавление
Автор Каев Артем - 14.02.2002