欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

WriteBlankLines 方法

在 TextStream 文件中寫入指定數(shù)目的新行字符。

object.WriteBlankLines(lines)

參數(shù)

object

必選項(xiàng)。應(yīng)為 TextStream 對(duì)象的名稱。

lines

必選項(xiàng)。要向文件寫入的新行字符數(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.ReadAll
End Function

請(qǐng)參閱

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

應(yīng)用于： TextStream 對(duì)象