Запись информации в файл


 

Существует несколько операторов вывода информации в файл.

1. Печать в последовательный файл

Данный оператор обеспечивает запись форматированного вывода в последовательный файл текстового типа – по аналогии с функцией печати:

 

Print #номер_файла; [<выходной_список_переменных>]

 

Выходной список печати может содержать:

 

[{Spc(n) | Tab[(n)]}] [<выражение>] [charpos]

 

где Spc(n) - длина пустой строки;

Tab(n) - печать с указанной позиции;

<выражение> - выражение числового или символьного типа;

charpos - определяет позицию вставки для следующего символа. Символ ; обеспечивает

переход на другую строку (к другой записи файла).

 

Если последовательный файл должен затем считываться, не рекомендуется применять оператор Print.

Пример 19.29.Печать в последовательный файл

 

Текст программы Комментарий
Open "FILE" For Output As #1 Print # 1 ; "Печать любого текста" Print #1; Print #1; "Код"; Tab ; "Наименование" Print #1; "Код" ; " " ; "Наименование" Print #l;Spc(5); "Код" Print #l;Tab(10); "Код" MyBool = False   MyDate = #February 12, 1969# MyNull = Null MyError = CVErr(32767) Print #1; MyBool; Print # 1; MyDate; " это дата " Print # 1 ; MyNull; " это пустое значение" Print #1 ; My Error; " код ошибки" Close #1 Открытие файла для печати Вывод в файл текстовой строки Вставка пустой строки Вывод в две колонки Разделение двух слов пробелом Вставка 5 отступов перед печатью слова Позиционирование в колонку 10 Присвоение значений переменным различного типа   Печать значения переменной в файл   Закрытие файла

 

2. Запись в последовательный файл

В последовательный файл запись информации выполняется командой:

Write#номер_файла; [<выходной_список_переменных>]

 

Для данных числового типа используется символ точка для десятичной точки. В отличие от оператора Printпри записи в файл автоматически вставляются специальные символы-разделители:

запятая – между элементами;

двойные кавычки – вокруг символьных данных.

В запись файла вставляется символ возврата каретки (переход на новую строку – запись файла).

Пример 19.30.Запись информации в последовательный файл

 

 

3. Вывод данных в файл произвольного доступа

Вывод данных выполняется оператором:

 

Put [#номер_файла; [#записи],<переменная>

 

где #записи - номер записи для файла произвольного доступа либо номер байта, с которого начинается запись, для двоичного файла. Если номер не указан, используется следующий за последним использованным в операторах Get, Put, Seek.

Пример 19.31.Запись в файл произвольного доступа

 

Текст программы Комментарий
Type Record   ID As Integer Name As String * 20 End Type Dim MyRecord As Record   Open "TESTFILE" For Random As #1 Len = Len(MyRecord)   For RecordNumber = 1 To 5 MyRecord.ID = RecordNumber MyRecord.Name = "Запись номер -" & RecordNumber Put #1, RecordNumber, MyRecord Next RecordNumber Close #1 Объявление пользовательского типа данных для записи   Объявление переменной на основе пользовательского типа данных Открытие файла произвольного доступа с длиной, соответствующей длине объявленного типа Организация цикла для записи в файл Формирование содержимого записи     Непосредственная запись в файл Конец цикла Закрытие файла


Дата добавления: 2021-12-14; просмотров: 286;


Поиск по сайту:

Воспользовавшись поиском можно найти нужную информацию на сайте.

Поделитесь с друзьями:

Считаете данную информацию полезной, тогда расскажите друзьям в соц. сетях.
Poznayka.org - Познайка.Орг - 2016-2024 год. Материал предоставляется для ознакомительных и учебных целей.
Генерация страницы за: 0.01 сек.