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