本页面由网页陶吧 龙犊收集整理 时间是: 02/05/06 下午 05:59:05.
页面地址: vsmthSkipLine.htm
标题: SkipLine 方法  •  文件大小: 2162  •  更新时间: Sun, 05 Feb 2006 03:21:34 GMT

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

请参阅

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

应用于: TextStream 对象