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



ReadAll 方法

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

object.ReadAll

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

說明

對于大文件,使用 ReadAll 方法浪費(fèi)內(nèi)存資源。應(yīng)該使用其他技術(shù)輸入文件,例如按行讀文件。

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.ReadAllEnd Function

請參閱

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

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

返回首頁