VBA中OpenTextFile 方法

OpenTextFile 方法：打开指定的文件并返回一个 TextStream 对象，可以通过这个对象对文件进行读、写或追加。

object.OpenTextFile(filename[, iomode[, create[, format]]])

参数
object：必选项。 object 应为 FileSystemObject 的名称。

filename：必选项。 指明要打开文件的字符串表达式。

iomode：可选项。 可以是三个常数之一： ForReading 、 ForWriting 或 ForAppending 。

create：可选项。 Boolean 值，指明当指定的 filename 不存在时是否创建新文件。 如果创建新文件则值为 True ，如果不创建则为 False 。 如果忽略，则不创建新文件。

Format：可选项。 使用三态值中的一个来指明打开文件的格式。 如果忽略，那么文件将以 ASCII 格式打开。

设置

iomode 参数可以是下列设置中的任一种：

format 参数可以是下列设置中的任一种：

说明

下面的代码说明了如何使用 OpenTextFile 方法打开文件并追加文本：

Sub OpenTextFileTest

    Const ForReading = 1, ForWriting = 2, ForAppending = 8

    Dim fso, f

    Set fso = CreateObject("Scripting.FileSystemObject")

    Set f = fso.OpenTextFile("c:/testfile.txt", ForWriting, True)

    f.Write "Hello world!"

    f.Close

End Sub