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


SkipLine 方法

當讀到 TextStream 文件時,跳過下一行。

object.SkipLine

object 應為 TextStream 對象名稱。

說明

跳過一行意味著讀并放棄本行所有字符并包括下一新行字符內容。 如果文件不是以讀方式打開則會出現(xiàn)錯誤。

下面例子舉例說明如何使用 SkipLine 方法:

Function SkipLineInFile
  Const ForReading = 1, ForWriting = 2
  Dim fso, f
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
  f.Write "嗨,你好!" & vbCrLf & "VB腳本很有趣!"
  Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
  f.SkipLine
  SkipLineInFile = f.ReadLine
End Function

請參閱

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

應用于: TextStream 對象