# SkipLine 方法
object.SkipLine
当读到 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
1
2
3
4
5
6
7
8
9
10
2
3
4
5
6
7
8
9
10
应用于