SkipLine 方法

當(dāng)讀到 TextStream 文件時，跳過下一行。

object.SkipLine

object 應(yīng)為 TextStream 對象名稱。

說明

跳過一行意味著讀并放棄本行所有字符并包括下一新行字符內(nèi)容。 如果文件不是以讀方式打開則會出現(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.ReadLineEnd Function