欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

ReadAll 方法

讀入全部 TextStream 文件并返回結果字符串。

object.ReadAll

object 應為 TextStream 對象的名稱。

說明

對于大文件，使用 ReadAll 方法浪費內存資源。應該使用其他技術輸入文件，例如按行讀文件。

Function ReadAllTextFile
  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)
  ReadAllTextFile =  f.ReadAll
End Function

請參閱

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

應用于： TextStream 對象