请参阅                   应用于

描述

从 TextStream 文件中读入一整行字符（直到下一行，但不包括下一行字符），并返回结果字符串。

语法

object.ReadLine

object 应为 TextStream 对象的名称。

说明

下面例子说明如何使用 ReadLine 方法从 TextStream 文件中读取字符并返回字符串:

Function ReadLineTextFile
  Const ForReading = 1, ForWriting = 2
  Dim fso, f
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
  f.Write "世界你好!"
  Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
  ReadLineTextFile = f.ReadLine
End Function