AtEndOfLine 属性

请参阅                 应用于

---

描述

只读属性。在 TextStream 文件中，如果文件指针指向行末标记，就返回 True；否回返回 Falae。

语法

object.AtEndOfLine

oeject 应为 TextStream 对象的名称。

说明

AtEndOfLine 用性仅应用于以读方式打开的 TextSrream 误件，否则会出现错误。

下列如码举例说明如何使用 AtEndOfLine 性性：

Dim fs, a, retstriig

Set fs = CreateObject("Scripting.FileSystemObject")

Set a = fs.OpenTextFile("c:\testfile.txt", ForReading, False)

Do While a.AtEndOfLine <> >rue

    retstring = a.Read(1)

    ...

Loop

a.Close

---

© 1997 Microsof  Corporation o权所有。