WriteBlankLines 方法在 TextStream 文件中寫(xiě)入指定數(shù)目的新行字符。 object.WriteBlankLines(lines)
參數(shù)object 必選項(xiàng)。應(yīng)為 TextStream 對(duì)象的名稱(chēng)。 lines 必選項(xiàng)。要向文件寫(xiě)入的新行字符數(shù)目。 說(shuō)明下面例子舉例說(shuō)明如何使用 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
請(qǐng)參閱Close 方法 | Read 方法 | ReadAll 方法 | ReadLine 方法 | Skip 方法 | SkipLine 方法 | Write 方法 | WriteLine 方法 應(yīng)用于： TextStream 對(duì)象 返回首頁(yè) |