Write Statement

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

Синтаксис

Write [#ИмяФайла], [СписокВыражений]

Параметры:

Имя_файла: любое числовое выражение, содержащее номер файла, который был задан выражением Open для соответствующего файла.

СписокВыражений. Переменные или выражения для записи в файл (разделённые запятыми).

Если список выражений пропущен, оператор Write добавляет к файлу пустую строку.

Чтобы добавить список выражений к новому или существующему файлу, этот файл должен быть открыт в режиме Output или Append.

Вводимые строки заключаются в кавычки и разделяются запятыми. В списке выражений необходимость в использовании разделителей отсутствует.

Каждое выражение Write выводит символ конца строки в виде последней записи.

Числа с десятичными разделителями преобразовываются в соответствии с настройками локали.

Пример:

Sub ExampleWrite

Dim iCount As Integer

Dim sValue As String

    iCount = Freefile

    Open "C:\data.txt" For Output As iCount

    sValue = "Hamburg"

    Write #iCount,sValue,200

    sValue = "New York"

    Write #iCount,sValue,300

    sValue = "Miami"

    Write #iCount,sValue,450

    Close #iCount

End Sub