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