ReadAll 方法

Microsoft(R) Visual Basic(R) Scripting Edition
ReadAll 方法

语言参考
起始页 | 版本 2

请参阅应用于

描述

读入全部 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