ReadLine 方法
從 TextStream 文件中讀入一整行字符(直到下一行,但不包括下一行字符),并返回結果字符串。
object.ReadLine
object 應為 TextStream 對象的名稱。
說明
下面例子說明如何使用 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