介绍
这篇文章将为大家详细讲解有关于六月中读取文本对象的作用是什么,文章内容质量较高,因此小编分享给大家做个参考,希望大家阅读完这篇文章后对相关知识有一定的了解。
文本对象是用于访问文本文件的对象,它是FileSystemObject一个独立的附属对象,但在使用文本对象时,我们仍要借助FileSystemObject对象或其附属对象来创建一个文本对象并访问磁盘文件的内容。可以通过FileSystemObject对象的CreateTextFile()及OpenTextFile(),来获取文本的对象句柄。
下面我们来具体的看看文本对象的方法及属性的使用
<强>文本对象的方法强>
方法说明关闭()关闭一个打开的文件读(numchars)从文件中读出,numchars ,个字符ReadAll()作为单个字符串读出整个文件ReadLine()作为一个字符串从文件中读出一行(直到回车符和换行)跳过(numchars)当从文件读出时忽略,numchars ,个字符SkipLine()当从文件读出时忽略下一行写(string)向文件写入字符串,stringWriteLine (string)向文件写入字符串,字符串(可选)和换行符WriteBlankLines (n)向文件写入,n 个换行符<强>关闭,写,WriteLine及WriteBlankLines的使用强>
方法名:关闭()
说明:关闭正在打开的文件
方法名:WriteLine (string)
说明:向文件写入字符串字符串(可选)和换行符。
示例:
Dim strPath strText 时间=strPath “C: \ testing.txt" 时间=strText “却;能够is Test hello word !“ & # 39;调用函数 Call 它仅仅(strPath strText) , Sub 它仅仅(strPath strText) Dim 才能;objFso objStream & # 39;才能创建FileSystemObject对象 Set 才能;objFso =, CreateObject (“Scripting.FileSystemObject") & # 39;才能使用CreateTextFile(),来返回一个文本对象句柄 Set 才能;objStream =, objFso.CreateTextFile (strPath,真的) & # 39;才能三个写的意思为:在文本中写入字符,写入带换行符的字符,写入3个换行符 objStream.Write才能(strText) objStream.WriteLine才能(strText) objStream才能只WriteBlankLines 3 & # 39;才能关闭文本对象 objStream.Close才能 最终获得子
<强>阅读,ReadAll及ReadLine的使用强>
方法名:阅读(numchars)
说明:从文本文件中读入指定数目的字符并返回结果字符串。
方法名:ReadAll ()
说明:读入全部文本文件并返回结果字符串。
方法名:ReadLine ()
说明:从文本文件中读入一整行字符(直到下一行,但不包括下一行字符),并返回字符串
示例:
Call 它仅仅(“c: \ test.txt",,“却;能够is Test !“,,, vbCrLf ,,“hello word !“) , Sub 它仅仅(strPath strText) Dim 才能;objFso objStream & # 39;才能创建FileSystemObject对象 Set 才能;objFso =, CreateObject (“Scripting.FileSystemObject") & # 39;才能使用FileSystemObject对象的CreateTextFile(),来返回一个文本对象句柄 Set 才能;objStream =, objFso.CreateTextFile (strPath,真的) & # 39;才能写入字符 objStream.WriteLine才能(strText) & # 39;才能读取字符串分别是:读取整行,读取所有,读取指定数目的字符 Msgbox 才能;(objStream.ReadLine) Set 才能;objStream =, objFso.OpenTextFile (strPath, 1,真的) Msgbox 才能;(objStream.ReadAll) Set 才能;objStream =, objFso.OpenTextFile (strPath, 1,真的) Msgbox 才能;(objStream.Read (9)) & # 39;才能关闭文本对象 objStream.Close才能 最终获得子
, <强>跳过,SkipLine的使用强>
方法名:跳过(numchars)
说明:读取文本文件时跳过指定数目的字符
方法名:SkipLine ()
说明:当读到文本文件时,跳过下一行。
示例:
Dim strPath strText 时间=strPath “C: \ test.txt" & # 39;调用函数 Call 它仅仅(strPath) , Sub 它仅仅(strPath) Dim 才能;objFso objStream & # 39;才能创建FileSystemObject对象 Set 才能;objFso =, CreateObject (“Scripting.FileSystemObject") & # 39;才能使用FileSystemObject对象的CreateTextFile(),来返回一个文本对象句柄 Set 才能;objStream =, objFso.CreateTextFile (strPath,真的) & # 39;才能在文本中写入字符 objStream.Write 才能“却;能够is Test !“,,, vbCrLf ,,“hello word !“ & # 39;才能以只读的方式打开文件 Set 才能;objStream =, objFso.OpenTextFile (strPath, 1,真的) & # 39;才能读取文件时跳过5个字符,或者跳过当前行,读取下一行 objStream.Skip才能(5) Msgbox objStream.ReadAll才能 Set 才能;objStream =, objFso.OpenTextFile (strPath, 1,真的) & # 39;才能跳过第一行 objStream.SkipLine才能 Msgbox objStream.ReadAll才能 & # 39;才能关闭文本对象 objStream.Close才能 最终获得子于六月中读取文本对象的作用是什么