Write 语句

向顺序文件中写入数据。

语法:

Write [#FileName], [Expressionlist]

参数:

FileName: 任何包含文件编号的数字表达式,此文件编号已由 Open 语句为相应的文档设定。

Expressionlist:要在文件中输入的变量或表达式,用逗号分隔。

如果省略了表达式列表,Write 语句将在文件后面附加一个空白行。

要向新的或现有的文件中添加表达式列表,必须以 OutputAppend 模式打开文件。

写入的字符串使用引号括起,之间以逗号隔开。在表达式列表中无需使用这些分隔符。

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