VBS教程:屬性-Line 屬性

NO IMAGE

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