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

Line 属性

只读属性,返回 TextStream 文件中的当前行号。

object.Line

object 通常是 TextStream 对象的名称。

说明

文件刚刚打开并在写入任何信息前,Line 等于 1。

下面例子举例说明如何使用 Line 属性:

Function GetLine
  Const ForReading = 1, ForWriting = 2
  Dim fso, f, ra
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
  f.Write "世界你好!" & vbCrLf & "VB脚本很有趣!" & vbCrLf
  Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
  ra =  f.ReadAll
  GetLine = f.Line   
End Function

请参阅

AtEndOfStream 属性 | AtEndOfLine 属性 | Column 属性

应用于:TextStream 对象