Microsoft(R) Visual Basic(R) Scripting Edition AtEndOfStream 属性 | 语言参考 起始页 | 版本 2

请参阅 应用于

##### 描述

> 如果文件指针位于 TextStream 文件末，则返回 True；否则如果不为只读则返回 False。

##### 语法

> object.AtEndOfStream

> object 应为 TextStream 对象的名称。

##### 说明

> AtEndOfStream 属性仅应用于以只读方式打开的 TextStream 文件，否则会出现错误。

> 下列代码举例说明如何使用 AtEndOfStream 属性：

> >     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.AtEndOfStream <> True
> >         retstring = theFile.ReadLine
> >         ...
> >     Loop
> >     theFile.Close
> >       ReadEntireFile = retstring
> >     End Function

(C) 1998 Microsoft Corporation. All rights reserved. Terms of Use.