# Read 方法

object.Read(characters)

从 TextStream 文件中读入指定数目的字符并返回结果字符串。

参数 描述
object 必选项。应为 TextStream 对象的名称。
filename 必选项。要从文件读的字符数目。

下面例子举例说明如何使用 Read 方法从文件中读取五个字符并返回字符串结果:

Function ReadTextFileTest
  Const ForReading = 1, ForWriting = 2, ForAppending = 8
  Dim fso, f, Msg
  Set fso = CreateObject("Scripting.FileSystemObject")   
  Set f = fso.OpenTextFile("c:\testfile.txt", ForWriting, True)
  f.Write "世界你好!"
  Set f = fso.OpenTextFile("c:\testfile.txt", ForReading)
  ReadTextFileTest =  f.Read(5)
End Function
1
2
3
4
5
6
7
8
9
应用于