Write # 语句
将数据写入顺序文件。
语法：
Write # filenumber , [ outputlist ]
- filenumber
- 任何有效的文件号。
- outputlist
- 可选 要写入文件的一个或多个以逗号分隔的数值表达式或字符串表达式。
使用**Write #**写入的数据通常用Input #从文件中读取。
当省略outputlist且文件号后跟逗号时，向文件打印一个空行。多个表达式可以用空格、分号或逗号分隔。空格与分号效果相同。
使用**Write #将数据写入文件时，遵循若干通用规则，使数据始终可以通过Input #**正确读取和解释，无论区域设置如何：
- 数值数据始终使用句点作为小数分隔符写入。
- 对于Boolean数据，打印
#TRUE#或#FALSE#。True和False关键字不会根据区域设置进行翻译。 - Date数据使用通用日期格式写入文件。当日期或时间部分缺失或为零时，仅写入提供的部分。
- 如果outputlist数据为Empty，则不向文件写入任何内容。但对于Null数据，写入
#NULL#。 - 对于Error数据，输出显示为
#ERRORerrorcode#。Error关键字不会根据区域设置进行翻译。
与Print #语句不同，**Write #**语句在将项写入文件时在项之间插入逗号，在字符串周围插入引号。列表中不需要显式分隔符。**Write #**在将outputlist中的最后一个字符写入文件后插入换行符——即回车换行符（Chr(13) + Chr(10)）。
WARNING
不要写入包含嵌入引号的字符串（例如"1,2""X"）供**Input #**语句使用；**Input #**会将此类字符串解析为两个完整且独立的字符串。
示例
本示例使用**Write #**语句将原始数据写入顺序文件。
vb
Open "TESTFILE" For Output As #1 ' Open file for output.
Write #1, "Hello World", 234 ' Write comma-delimited data.
Write #1, ' Write blank line.
Dim MyBool, MyDate, MyNull, MyError
' Assign Boolean, Date, Null, and Error values.
MyBool = False : MyDate = #February 12, 1969# : MyNull = Null
MyError = CVErr(32767)
' Boolean data is written as #TRUE# or #FALSE#. Date literals are
' written in universal date format, for example, #1994-07-13#
' represents July 13, 1994. Null data is written as #NULL#.
' Error data is written as #ERROR errorcode#.
Write #1, MyBool; " is a Boolean value"
Write #1, MyDate; " is a date"
Write #1, MyNull; " is a null value"
Write #1, MyError; " is an error value"
Close #1 ' Close file.