Write # 语句

将数据写入到顺序文件中。

语法

Write #filenumber, [ outputlist ]

Write # 语句语法包含以下部分:

Part 说明
filenumber 必填。 任何有效的文件编号
outputlist 可选。 可写入到文件中的一个或多个逗号分隔的数值表达式字符串表达式

备注

使用 写入 # 写入的数据通常从具有 Input #的文件中读取。

如果您省略 outputlist 并在 filenumber 之后包含一个逗号,则会将空行打印到文件中。 多个表达式可使用空格、冒号或逗号进行分隔。 空格的效果与冒号一样。

使用 写入 # 将数据写入文件时,将遵循几个通用假设,以便始终可以使用 输入 #读取和正确解释数据,而不考虑 区域设置

  • 始终使用句点作为小数分隔符来写入数值数据。
  • 对于 Boolean 数据,将打印 #TRUE##FALSE#。 将不会翻译 TrueFalse关键字,而不管区域设置如何。
  • 使用通用日期格式将日期数据写入文件。 当日期或时间组件缺失或为零时,仅提供的部分将被写入到文件中。
  • 如果 outputlist 数据为 Empty,则不向文件中写入任何内容。 但是对于 Null 数据,将写入 #NULL#
  • 如果 outputlist 数据为 Null 数据, #NULL# 则会写入 文件。
  • 对于 Error 数据,输出将显示为 #ERROR errorcode#。 将不会翻译 Error 关键字,而不管区域设置如何。

Print # 语句不同, Write # 语句在项之间插入逗号,并在字符串写入文件时用引号括起来。 您不必在列表中放置显式的分隔符。 Write # 在将输出列表中的最后一个字符写入文件后,插入一个换行符,即回车换行符 (Chr (13) + Chr (10) ) 。

注意

不应编写包含嵌入引号的字符串,例如, "1,2""X" 用于 Input # 语句; 输入 # 将此字符串分析为两个完整和单独的字符串。

示例

此示例使用 Write # 语句将原始数据写入到一个顺序文件中。

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. 

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。