亚洲乱码中文字幕综合,中国熟女仑乱hd,亚洲精品乱拍国产一区二区三区,一本大道卡一卡二卡三乱码全集资源,又粗又黄又硬又爽的免费视频



ReadLine 方法

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

object.ReadLine

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

說(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

請(qǐng)參閱

Close 方法 | Read 方法 | ReadAll 方法 | Skip 方法 | SkipLine 方法 | Write 方法 | WriteLine 方法 | WriteBlankLines 方法

應(yīng)用于: TextStream 對(duì)象

返回首頁(yè)