【烟花原创】VBA零基础之第227篇 FSO对象（26）

hwc2ycy

CreateTextFile 方法
功能：创建一个指定的文件名并且返回一个用于该文件读写的 TextStream 对象。
语法：object.CreateTextFile(filename[, overwrite[, unicode]])
object 必需的。始终是一个 FileSystemObject 或 Folder 对象的名字。
filename 必需的。字符串表达式，它标识创建的文件。
overwrite 可选的。Boolean 值，表示一个已存在文件是否可被覆盖。如果可被覆盖其值为 True，其值为 False 时不能覆盖。如果它被省略，则已存在文件不能覆盖。
unicode 可选的。Boolean 值，表示文件是作为一个 Unicode 文件创建的还是作为一个ASCII 文件创建的。如果作为一个 Unicode 文件创建，其值为 True，作为一个 ASCII 文件创建，其值为 False。如果省略的话，则认为是一个 ASCII 文件。
对于一个已经存在的 filename，如果 overwrite 参数是 False 或者没有提供，则发生一个错误。

示例1：


OpenTextFile 方法
功能：打开一个指定的文件并返回一个 TextStream 对象，该对象可用于对文件进行读操作或追加操作。
语法：object.OpenTextFile(filename[, iomode[, create[, format]]])
Object 必需的。始终是一个 FileSystemObject 的名字。
filename 必需的。字符串表达式，它标识了打开的文件。
iomode 可选的。表示输入/输出方式。可为两个常数之一：ForReading或 ForAppending。
create 可选的。Boolean 值，它表示如果指定的 filename 不存在是否可以创建一个新文件。如果创建新文件，其值为 True。若不创建文件其值为 False。缺省值为 False。
format 可选的。三种 Tristate 值之一，用于指示打开文件的格式。如果省略，则文件以 ASCII 格式打开。

iomode 参数可为下面设置值的任何一个：
ForReading 1 打开一个只读文件。不能对此文件进行写操作。
ForAppending 8 打开一个文件并写到文件的尾部。

Format 参数可为下面设置值的任何值：
TristateUseDefault –2 使用系统缺省打开文件。
TristateTrue –1 以 Unicode 格式打开文件。
TristateFalse   0 以 ASCII 格式打开文件。

示例：

效果：

hxigang

{:1112:}

yewei113

{:1112:}