SkipLine 方法
当读到 TextStream 文件时,跳过下一行。
object.SkipLine
object 应为 TextStream 对象名称。
说明
跳过一行意味着读并放弃本行所有字符并包括下一新行字符内容。 如果文件不是以读方式打开则会出现错误。
下面例子举例说明如何使用 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