TextStream對象是用于訪問文本文件的對象,它是FileSystemObject一個獨立的附屬對象,但在使用TextStream對象時,我們仍要借助FileSystemObject 對象或其附屬對象來創建一個 TextStream 對象并訪問磁盤文件的內容??梢酝ㄟ^FileSystemObject 對象的CreateTextFile()及OpenTextFile(),來獲取TextStream的對象句柄。
下面我們來具體的看看TextStream 對象的方法及屬性的使用
TextStream對象的方法
方法 | 說明 |
Close() | 關閉一個打開的文件 |
Read(numchars) | 從文件中讀出 numchars 個字符 |
ReadAll() | 作為單個字符串讀出整個文件 |
ReadLine() | 作為一個字符串從文件中讀出一行(直到回車符和換行) |
Skip(numchars) | 當從文件讀出時忽略 numchars 個字符 |
SkipLine() | 當從文件讀出時忽略下一行 |
Write(string) | 向文件寫入字符串 string |
WriteLine(string) | 向文件寫入字符串 string(可選)和換行符 |
WriteBlankLines(n) | 向文件寫入 n 個換行符 |
Close、Write、WriteLine及WriteBlankLines的使用
方法名:Close()
說明:關閉正在打開的文件
方法名:WriteLine(string)
說明:向文件寫入字符串 string(可選)和換行符。
示例:
Dim strPath,strTextstrPath = "C:/testing.txt"strText = "This is Test !hello word !"'調用函數Call CreateFile(strPath,strText) Sub CreateFile(strPath,strText) Dim objFso,objStream '創建FileSystemObject對象 Set objFso = CreateObject("Scripting.FileSystemObject") '使用CreateTextFile(),來返回一個TextStream對象句柄 Set objStream = objFso.CreateTextFile(strPath,True) '三個Write的意思為:在文本中寫入字符、寫入帶換行符的字符、寫入3個換行符 objStream.Write(strText) objStream.WriteLine(strText) objStream. WriteBlankLines 3 '關閉TextStream對象 objStream.CloseEnd Sub |
Read、ReadAll及ReadLine的使用
方法名:Read(numchars)
說明:從 TextStream文件中讀入指定數目的字符并返回結果字符串。
方法名:ReadAll()
說明:讀入全部 TextStream文件并返回結果字符串。
方法名:ReadLine()
說明:從 TextStream文件中讀入一整行字符(直到下一行,但不包括下一行字符),并返回字符串
示例: