现在我把TextStream对象的属性和方法列表如下：
描述
只读属性，在 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
AtEndOfStream 属性
描述
只读属性，如果文件指针在 TextStream 文件末尾，则该属性值返回 True；否则返回 False。
语法
object.AtEndOfStream
object 总是一个 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
Close 方法
复制代码
Column 属性
复制代码
Line 属性
复制代码
Read 方法
复制代码
ReadAll 方法
复制代码
ReadLine 方法
复制代码
Skip 方法
复制代码
SkipLine 方法
复制代码
Write 方法
复制代码
WriteBlankLines 方法
复制代码
WriteLine 方法
复制代码
置顶卡
