OpenTextFile 方法

打开指定的文件并返回一个 TextStream 对象，该对象可用于从该文件读取、写入或追加文件。

语法

对象。OpenTextFile (filename， [ iomode， [ create， [ format ]]] )

“OpenTextFile”方法具有以下部件：

Part	说明
object	必填。 始终是 FileSystemObject 的名称。
文件名	必填。 标识要打开的文件的字符串表达式。
iomode	可选。 指示输入/输出模式。 可以是以下三种常量之一：ForReading、ForWriting 或 ForAppending。
创建	可选。 指示当指定的文件名不存在时是否可以创建新文件的 Boolean值。 如果创建新文件，则该值为“True”；否则，为“False”。 默认值为“False”。
format	可选。 用于指示已打开文件的格式的三个“Tristate”值之一。 如果省略了，该文件则打开为 ASCII。

设置

iomode 参数可以具有以下任何设置：

常量	值	Description
ForReading	1	只为了要读取而打开文件。 不能写入该文件。
ForWriting	2	打开文件以供仅写入。 使用此模式可将现有文件替换为新数据。 无法从此文件读取数据。
ForAppending	8	打开文件，然后写入到文件的末尾。 无法从此文件读取数据。

格式参数可以具有以下任一设置：

常量	值	Description
TristateUseDefault	-2	使用系统默认值打开文件。
TristateTrue	-1	打开该文件为 Unicode。
TristateFalse	0	打开该文件为 ASCII。

备注

以下代码演示了使用“OpenTextFile”方法打开要追加文本的文件：

Sub OpenTextFileTest
    Const ForReading = 1, ForWriting = 2, ForAppending = 8
    Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
    Dim fs, f
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.OpenTextFile("c:\testfile.txt", ForAppending, True, TristateFalse)
    f.Write "Hello world!"
    f.Close
End Sub

另请参阅

• 对象 (Visual Basic for Applications)

支持和反馈

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