Microsoft® Visual Basic® Scripting Edition AtEndOfStream 属性 |
语言参考 版本 2 |
只读属性,如果文件指针位于 TextStream 文件末,则返回 True;否则返回 False。
object.AtEndOfStreamobject 应为 TextStream 对象的名称。
AtEndOfStream 属性仅应用于以只读方式打开的 TextStream 文件,否则会出现错误。下列代码举例说明如何使用 AtEndOfStream 属性:
Dim fs, a, retstring Set fs = CreateObject("Scripting.FileSystemObject") Set a = fs.OpenTextFile("c:\testfile.txt", ForReading, False) Do While a.AtEndOfStream <> True retstring = a.ReadLine ... Loop a.Close