VBS教程:方法-WriteBlankLines 方法

(编辑:jimmy 日期: 2024/11/15 浏览:2)

WriteBlankLines 方法

TextStream 文件中写入指定数目的新行字符。

object.WriteBlankLines(lines)

参数

object

必选项。应为 TextStream 对象的名称。

lines

必选项。要向文件写入的新行字符数目。

说明

下面例子举例说明如何使用 WriteBlankLines 方法:

Function WriteBlankLinesToFile  Const ForReading = 1, ForWriting = 2  Dim fso, f  Set fso = CreateObject("Scripting.FileSystemObject")  Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)  f.WriteBlankLines 2   f.WriteLine "嗨,你好!"  Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)  WriteBlankLinesToFile = f.ReadAllEnd Function