时间：2020-11-30 12:24:13 | 栏目：VBS | 点击：次
TextStream 文件中，如果文件指针指向行末标记，就返回 True；否则如果不是只读则返回 False。
object.AtEndOfLine
object 应为 TextStream 对象的名称。
AtEndOfLine 属性仅应用于以读方式打开的 TextStream 文件，否则会出现错误。
下列代码举例说明如何使用 AtEndOfLine 属性：
Function ReadEntireFile(filespec) Const ForReading = 1 Dim fso, theFile, retstring Set fso = CreateObject("Scripting.FileSystemObject") Set theFile = fso.OpenTextFile(filespec, ForReading, False) Do While theFile.AtEndOfLine <> True retstring = theFile.Read(1) Loop theFile.Close ReadEntireFile = retstringEnd Function