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