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

请参阅

Close 方法 | Read 方法 | ReadAll 方法 | ReadLine 方法 | Skip 方法 | SkipLine 方法 | Write 方法 | WriteLine 方法

应用于: TextStream 对象

返回首页