通常使用 Print # 从文件写入使用 Line Input # 读取的数据。

Line Input # 语句一次从文件中读取一个字符，直到遇到回车符 ( Chr (13) ) 或回车回车行源 ( Chr (13) + Chr (10) ) 序列。 回车-换行序列将被跳过，而不是附加到字符串后面。

此示例使用 Line Input # 语句从顺序文件中读取行并将其分配给变量。 此示例假定 TESTFILE 是包含几行示例数据的文本文件。

Dim TextLine 
Open "TESTFILE" For Input As #1 ' Open file. 
Do While Not EOF(1) ' Loop until end of file. 
 Line Input #1, TextLine ' Read line into variable. 
 Debug.Print TextLine ' Print to the Immediate window. 
Close #1 ' Close file. 
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。