Самоучитель VBA


Ввод данных в файл последовательного доступа



Ввод данных в файл последовательного доступа

Обсудим инструкции, используемые при вводе информации в файл последовательного доступа.

Print

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

Print #НомерФайла, [СписокВывода]

  • номерФайла — номер файла О слисокВывода — выражение (или список выражений), записываемое в файл. В аргументе СписокВывода разделителем списка выводимых выражений является ";" (данные выводятся подряд) или "," (данные выводятся по зонам). Кроме того, в аргументе СписокВывода допускается использование функций Spc и таь:
  • spc(n) — используется для вставки п пробелов в файл
  • Tab(n) — устанавливает курсор в столбец с номером n

Write

Записывает неформатированные данные в файл последовательного доступа. В отличие от инструкции Print, инструкция write вставляет запятые между элементами и заключает строки в кавычки по мере записи их в файл.

Синтаксис:

Write #НомерФайла, [СписокВывода]

  • НомерФайла — номер файла
  • СписокВывода — выражение или список выражений, записываемых в файл Данные, записанные с помощью инструкции write, обычно считываются из файла с помощью инструкции input

Приведем две процедуры, использующие инструкции Print и write для создания файлов последовательного доступа. Сначала рассмотрим процедуру с инструкцией

Print. Sub

ПримерИспольэования Print

Open "С:\Новый" For Output As II

' Печатает текст в файл '

Print #1, "Тест"

'

' Печатает пустую строку в файл

'

Print #l,

'

' Печатает в двух зонах печати

'

Print #1, "Зона 1";

Tab;

"Зона 2" ;

Spc(3) ;

"3 пробела"

Close #1

End Sub

Результатом описанных выше инструкций будет файл со следующим содержимым:

Тест

Зона 1 Зона 2 3 пробела

Перейдем теперь к примеру процедуры, создающей файл последовательного

Достпа при помощи инструкции Write.

Sub ПримерИспользованияwriteе

Open "ЕщеПример"

For Output As #1

Write #1, "Пример";

"использования"

Write #l, "инструкции";

Write #1, "Write"

x = 1

Write #1, "Число";

х Close #1

End Sub

Результатом описанных выше инструкций будет файл со следующим содержимым:

"Пример","использования" "инструкции","Write" "Число",1

Обратите внимание на автоматическое размещение в файле разделителей -запятых, и то, что строковая информация берется в кавычки. В процедуре

ПримерислользованияWrite вторая инструкция write специально заканчивается знаком ";" Это обеспечивает вывод данных третьей инструкцией write в ту же строку файла, в которую выводила вторая инструкция.









Начало  Назад  Вперед