Write # filenum , [ expressionlist ]

filenum
expressionlist

将expressionlist 中的值输出到绑定到filenum 的文本文件或设备。值用逗号分隔，字符串用双引号括起来。如果没有给出大于0的数值（0）和小于一个（1）的前缀为零（0）（例如，-.123的值将输出为-0.123） 。额外的零被截断。

如果没有给出表达式列表，Write #输出回车符（注意，即使没有给出表达式列表，仍然需要filenum 之后的逗号）。
Write #的目的是创建一个可以使用输入＃回读的文件。

Const filename As String = "file.txt的"

Dim filenum As Integer = FreeFile()
If 0 <> Open(filename, For Output, As filenum) Then
    Print "打开错误" & filename & "用于输出。"
    End -1
End If

Dim i As Integer = 10
Dim d As Double = 123.456
Dim s As String = "文本"

Write #filenum, 123, "文本", -.45600
Write #filenum,
Write #filenum, i, d, s

将生成文件：

123,"text",-0.456

10,123.456,"text"

• 没有
  
  

• Write
  
• Print #
  
• Input #