在 TextStream 文件中写入指定数目的新行字符。
object.WriteBlankLines(lines)
object
必选项。应为 TextStream 对象的名称。
lines
必选项。要向文件写入的新行字符数目。
下面例子举例说明如何使用 WriteBlankLines 方法:
Function WriteBlankLinesToFileConst ForReading = 1, ForWriting = 2Dim fso, fSet fso = CreateObject("Scripting.FileSystemObject")Set f = fso.OpenTextFile("c: estfile.txt", ForWriting, True)f.WriteBlankLines 2 f.WriteLine "
嗨,你好!"
Set f = fso.OpenTextFile("c: estfile.txt", ForReading)
WriteBlankLinesToFile = f.ReadAll
End Function