Читает строку из открытого последовательного файла и присваивает ее переменной типа 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 ' Закрывает файл.