Когда объект Text Stream создается из объекта File, режим ввода-вывода задается как аргумент метода OpenAsText Stream с помощью трех соответствующим образом названных констант: For Reading (для чтения), For Writing (для записи) и ForAppending (для добавления). Например, если нужно добавить текст в конец существующего файла, откройте текстовый поток с помощью следующего оператора:
Set objTS = objFile.OpenAsTextStreamfForAppending)
Открыв объект Text Stream в подходящем режиме доступа, можно начинать работу с содержимым файла. В вашем распоряжении для этого есть несколько простых методов.
Можно читать и записывать данные как отдельные символы или строки. Если только все элементы данных не равны по длине, я рекомендую построчное считывание и построчную запись. Когда читаются строки данных, вам не нужно знать длину строк, а только их номер. Сама же "строка" может состоять из любого числа символов и даже вообще не содержать ни одного символа.
В любом случае, чтобы читать данные из текстового потока, присвойте переменной значение, возвращаемое одним из подходящих методов объекта Text Stream. Следующий фрагмент программного кода подскажет вам, как это сделать:
' чтение следующей строки из файла в переменную
strНекоторыйТекст = Text Stream.ReadLine
Для чтения предусмотрены следующие методы.
Метод (объекта Text Stream) | Выполняемое действие |
Read (число_символов) | Чтение заданного числа символов начиная с текущей позиции в файле |
ReadLine | Чтение всех символов начиная с текущей позиции в файле до следующего символа перехода на новую строку |
ReadAll | Чтение всего файла |
Skip ( число_символов) | Пропуск заданного числа символов при чтении файла. Следующее чтение должно начаться с первого из символов, следующих за пропущенными |
SkipLine | Пропуск следующей строки в файле. Следующее чтение должно начаться с первого из символов, следующих за пропущенной строкой |
Чтобы записать данные в текстовый поток, задайте текст для записи в виде строки как аргумент метода Write или WriteLine, как в следующем примере:
' запись строки
objTextStream.Write "Алло, центральная!"
' запись значения переменной с последующим символом
' перехода на новую строку
objTextStream.WriteLine strMyTwoBits
Метод (объекта TextStream) | Выполняемое действие |
Write(строка) | Запись в текстовый поток указанной строки |