唯讀屬性。在 TextStream 檔案中,如果檔案指針指向行末標記,就返回 True;否則返回 False。
基本介紹
- 中文名:AtEndOfLine
- 描述:唯讀屬性。在 TextStrea
- 語法:object.AtEndOfLine
- 說明:AtEndOfLine 屬性僅
描述
唯讀屬性。在 TextStream 檔案中,如果檔案指針指向行末標記,就返回 True;否則返回 False。
語法
object.AtEndOfLine
object 應為 TextStream 對象的名稱。
說明
AtEndOfLine 屬性僅套用於以讀方式打開的 TextStream 檔案,否則會出現錯誤。
下列代碼舉例說明如何使用 AtEndOfLine 屬性:
Dim fs, a, retstring
Set fs = CreateObject("Scripting.FileSystemObject")
Set a = fs.OpenTextFile("c:\testfile.txt", ForReading, False)
Do While a.AtEndOfLine <> True
retstring = a.Read(1)
...
Loop
a.Close