ReadLine 方法

從 TextStream 文件中讀入一整行字符（直到下一行，但不包括下一行字符），并返回結(jié)果字符串。

object.ReadLine

object 應(yīng)為 TextStream 對(duì)象的名稱。

說(shuō)明

下面例子說(shuō)明如何使用 ReadLine 方法從 TextStream 文件中讀取字符并返回字符串:

Function ReadLineTextFile   Const ForReading = 1, ForWriting = 2   Dim fso, MyFile   Set fso = CreateObject("Scripting.FileSystemObject")   Set MyFile = fso.OpenTextFile("c:/testfile.txt", ForWriting, True)   MyFile.WriteLine "Hello world!"   MyFile.WriteLine "The quick brown fox"   MyFile.Close   Set MyFile = fso.OpenTextFile("c:/testfile.txt", ForReading)   ReadLineTextFile = MyFile.ReadLine    ' Returns "Hello world!"End Function