本篇文章给大家讲讲使用FSO对象从文本文件中读取信息，以及obj教学模式对应的知识点，希望对各位有所帮助。
大家好，今天我来讲解一下教程第18题的第四节。本专题是一个非常实用的知识点，每个人都可以掌握和使用。本教程提供了支持程序文件。
第4节使用FSO对象从文本文件中读取信息
大家好，我们继续讲解如何使用FSO对象来获取信息。今天的主题是关于如何使用FSO对象从文本文件中读取信息。读取文件信息是我们经常使用的任务。在本次讲座中，我将详细解释这一点，并提供代码供参考。
1获取文件信息的基本语句说明
1)OpenTextFile方法打开指定的文件并返回一个TextStream对象，该对象可用于读取、写入或追加到文件。
语法objectOpenTextFile文件名，[iomode,[创建，[格式]]]
范围
object必需；始终是FileSystemObject的名称。
文件名需要一个字符串表达式来标识要打开的文件。
iomode是可选的，表示输入/输出模式。它可以是三个常量之一ForReading、ForWriting或ForAppending。
创建一个可选的布尔值。指示当指定的文件名不存在时是否可以创建新文件。如果创建新文件则值为34，否则为34；默认为34；
格式是可选的。三个34个值之一，用于指示打开文件的类型。如果省略，文件将以ASCII格式打开。
注1上述参数中，iomode可以用以下常量替换
ForReading1打开文件以只读方式。无法写入文件。
ForWriting2打开文件仅供写入。使用此模式用新数据替换现有文件。无法读取该文件。
ForAppending8打开一个文件并写入到文件末尾。无法读取该文件。
注2格式可以用以下常量替换
TristateUseDefault-2使用系统默认打开文件。
TristateTrue-1以Unicode格式打开文件。
TristateFalse0以ASCII格式打开文件。
注3以下是该方法的应用示例代码。
常量用于读取=1，用于写入=2，用于追加=8
设置fs=CreateObject34。
设置f=fsOpenTextFile34;ForAppending,TristateFalse
使用f34；
f关闭
2）TextStream对象方便对文件进行顺序访，可以理解为顺序文件。上面的OpenTextFile方法返回一个TextStream对象。
在实际使用中，TextStream被替换为代表FileSystemObject返回的TextStream对象的变量占位符。
这里先介绍一下这个对象的方法和属性，稍后再解释。
方法说明
关闭关闭打开的TextStream文件。
Read从TextStream文件中读取指定数量的字符并返回结果。
ReadAll读取整个TextStream文件并返回结果。
ReadLine从TextStream文件中读取一行并返回结果。
Skip在读取TextStream文件时跳过指定数量的字符。
SkipLine读取TextStream文件时跳过下一行。
Write将指定的文本写入TextStream文件。
WriteBlankLines将指定数量的换行符写入TextStream文件。
WriteLine将指定的文本和换行符写入TextStream文件。
属性说明
AtEndOfLine如果文件指针位于TextStream文件中的行尾标记之前，则返回true，否则返回false。
AtEndOfStream如果文件指针位于TextStream文件末尾，则返回true，否则返回false。
Column返回输入流中当前字符位置的列号。
Line返回TextStream文件的当前行号。
3)AtEndOfStream属性，只读属性如果文件指针位于TextStream文件末尾则返回True，否则返回False。
语法objectAtEndOfStream
范围
对象的名称，始终是TextStream对象。
注意AtEndOfStream属性仅适用于打开以供读取的TextStream文件。否则会出现错误。
4)ReadLine方法读取文件中的整行并返回结果字符串。
语法objectReadLine
范围
对象，始终是TextStream对象的名称。
5)read方法从TextStream文件中读取指定数量的字符并返回结果字符串。
语法object读取字符
范围
object必需；始终是TextStream对象的名称。
必需的字符数，从文件中读取的字符数。
2获取文件信息的实际应用代码
要读取本地文件夹中的34个文件，可以使用以下代码中的各种方法。
SubmynzC34;sheet334;ScriptingFileSystemObject39;打开文本文件
设置objStream=objFsoOpenTextFileThisWorkbookPath34;1
34；首次读取文件内容39；
设置objStream=objFsoOpenTextFileThisWorkbookPath34;1
34；二、读取文件内容34文本测试txt39；
strTemp=objStreamRead15
单元7，1=34；
Cells8,1=strTemp
strTemp=strTempobjStreamReadFileLenThisWorkbookPath34；
单元格10,1=34;
细胞11,1=strTemp
objStream关闭
设置objStream=无
objFso=不设置任何内容
消息框34；
服务结束
代码截图
代码说明
1）上面的代码使用了四种方法来读取给定的34个文件。
2)执行直到objStreamAtEndOfStream
strTemp=strTempobjStreamReadLinevbCrLf
戒指
上面的代码使用循环语句第一次读取文件。
2）objStreamReadAll的第二个选项是直接读取整个文件。
3）objStreamRead15的第三个选项是读取文件的15个字符。
4)strTempobjStreamReadFileLenThisWorkbookPath34;第四次看的时候，第三次打开文件的时候，就要小心了。这次我们需要读取15个字符才能读取整个文件。添加上面的15个字符。
3、获得应用文件信息实际代码的效果
单击“运行”按钮可以查看执行效果。
从上面的实现效果可以看出，使用FSO对象读取文件信息是非常方便可行的。
本节知识点参考
在这个例子中，使用什么语句使用FSO对象读取文件？
四种读取文件的方式有什么区别？
本课程的代码参考文件018Worksheetxlsm
构建块编程的思想和含义
在我的系列丛书中，我总是读34；一直以来都强调编程思想，这也是学习如何使用VBA的主要方式，特别是对于需要采用这种解决方案的专业人士来说。主要含义是
1.不要手动输入所有代码。你所要做的就是将积木放在适当的位置，然后从积木库中复制代码，然后花时间高效地思考。
2创建您自己的34；我们收集了在一般学习过程中有用的代码，因此我们可以在需要时检索它。您的构建块库中的信息越多，您的编程思想就越广泛。
定义和学习VBA应用程序教程
VBA是使用Office实现小型个人办公自动化的有效手段。这是我的VBA应用程序定义。在新的办公软件出现取代OFFICE之前，谁能在数据处理上取得最好的效果，谁就是王者。其中最厉害的就是VBA！
我记得20年前我第一次学习VBA的时候，真的很难，因为我靠看源代码自己能弄清楚的信息很少。20年过去了。为了防止学VBA的朋友重蹈以前的覆辙，我根据自己多年使用VBA的实践经验，推出了六本VBA专题教程。本教程现已通过测试。32位和64位OFFICE系统。
第一套VBA代码解，是VBA中各个知识点的讲解。教程共147篇，涵盖大部分VBA知识点。提供的程序文件是有价值的代码，适合初学者和中级用户。本教程集当前版本为修订后的第二版，程序文件已在32位和64位OFFICE系统上通过测试。
第二套VBA数据库解决方案数据库是专门用于数据处理的工具。本教程详细介绍了如何使用ADO连接ACCDB和EXCEL，并提供示例任务，适合中级学习者学习。本教程集介绍了现已修订的教程的第一个版本，程序文件已经在32位和64位OFFICE系统上进行了测试。
第三组VBA数组和字典解决方案数组和字典是VBA的核心。字典是提高你的VBA代码水平的有效手段，是中级人员提高代码水平的手段。本教程集当前版本是第一次修订版本，程序文件已经在32位和64位OFFICE系统上进行了测试。
第四套VBA代码解视频是针对初学者的视频讲解，将帮助您快速入门并更快地掌握这项技能。本套教程是第一套教程的视频讲解，听合集时更容易接受。本教程集还提供了已在32位和64位OFFICE系统上测试过的附加程序文件。
第5组在VBA中解释和使用类这是一个高级教程，解释了类的清空和实现。虽然这些课程用处不大，但仔细学习可以提高你的VBA理论。理解这套教程主要是让读者了解和理解一种佛教哲学。本教程集当前可用的版本是
一、blender怎么导出obj格式？
。
1.Blender打开一个场景。
2.右键单击选择要导出的对象。
3.从菜单中选择“文件”--“导出”--“Wavefront--obj”。
4.勾选左侧的“仅导出选定的对象”。
5.输入“名称”和“路径”，然后单击“导出OBJ”导出对象。
6.然后您可以在导出的文件夹中找到两个文件mtl和obj。您可以导入obj并将该对象导出为场景。
二、zip模式如何变成obj？
要将压缩文件的特定文件扩展名更改为-obj，请按照下列步骤操作
1-解压缩zip文件首先，在计算机上解压缩包含目标文件的zip文件。可以使用常见的解压软件如WinRAR、7-Zip等。
2-确定目标文件在解压后的文件夹中找到要更改扩展名的目标文件。确保您了解文件类型并可以合法地将其更改为-obj格式。
3-更改文件扩展名选择目标文件后，右键单击该文件并选择重命名选项。然后将原来的文件扩展名改为-obj。更改扩展名不会自动转换文件的内容或格式；它只会更改文件的识别方式。
将文件扩展名更改为-obj不会自动将其转换为可识别的-obj格式。要将文件从格式转换为-obj格式，您可能需要使用特殊的文件转换工具或适当的软件来执行格式转换。这通常涉及使用特定的文件导出功能或对文件进行转码。具体的转换过程和可用工具取决于您的文件格式和要求。
三、聊天时后面有个obj什么意思？
一些无法在聊天内容中显示的表情符号或插入的对象会显示为一个框，其中obj代表该对象。
QQ聊天时，有时别人给你发消息时，他说的那句话后面会出现一个obj和一个虚线框。其实有很多人不知道这是什么。这很简单。因为对方使用语音输入，所以语音翻译的句子后面会有这个标记。没有什么特殊意义，所以至少苹果系统内置了这个声音，所以不用太紧张。点击转换后的文本中的麦克风标记后，当小圆圈没有消失时，发送给对方，就会创建一个obj。
除了这个含义之外，网友们还对obj提出了其他解读。obj是object的缩写，所以obj可以有两种完全相反的情况。发这句话的人是“我关心你”。另一方面，如果你想得不好，则说明你认为聊天时对方不会轻易跟你说话，或者你不是合适的人。如果你想尽快结束这段没有结果的关系，你需要主动出击，停止跟踪。
互联网术语来得快去得也快。如果您几天不上网，您可能会失去与互联网的连接。合理点吧。
No Comment