串口读写源码vb_用VB同时读取记事本和Word文档的实现

点击上方蓝字 高效学编程喽 VB编程，功能强大。 今天，我们共同来学习用VB编程读取记事本和Word文档内容 。 用到的VB知识主要有控件的应用、文件的读写操作。

VB读取记事本和Word文档运行图

程序实现过程

1、首先添加控件，如下图

2、读取记事本文件代码实现

Private Sub Command1_Click() '读取记事本文件内容Dim content As StringOpen App.Path & "\test.txt" For Input As #1 '读取文件语句Do While Not EOF(1)Line Input #1, content '按行读取文件内容List1.AddItem content LoopClose #1End Sub

3、读取Word文档内容实现

Private Sub Command2_Click() '读取Word文档内容Dim wordDoc As Object    Set wordDoc = GetObject(App.Path & "\test.doc")    Text1 = wordDoc.content.Text    Set wordDoc = NothingEnd Sub

最后，点击运行按钮，即可完成读取文档内容功能。

程序实现相关知识

顺序文件读写 

 打开文件

Open “文件名” For 模式 As [#]文件号 OutPut(写):新建或打开一个文件，进行写操作。文件若存在，则打开，写入信息覆盖原有信息；文件若不存在，则新建。 Input (读) :打开一个文件，进行读操作。文件必须存在，否则出错。 Append(追加):新建或打开一个文件，进行写操作。文件若存在，则打开，写入信息追加在原有信息之后；文件若不存在，则新建。

[实例] 如果要打开“C：\USER”目录下一个文件名为“SCORE.TXT”的文件，对它写数据，指定文件号为#1，命令为代码怎么写呢?

 写操作

写文件Print # 文件号，[输出列表]Write # 文件号，[输出列表]Write命令的功能和Print相同，区别在于Write命令是以紧凑格式输出，在数据项之间自动添加“，”分隔符，并给字符型的数据加上双引号。

[实例]　区分Write#命令和Print#命令。

 读操作

读文件  -Input # 文件号，变量列表  将读出的数据分别赋给指定的变量。   -Line Input # 文件号，字符型变量  从文件中读出一行赋给指定变量。   -Input $ (读取的字符数，# 文件号) 从文件中读取指定数目的字符。

读/写文件时常用的两个重要函数：

 关闭文件

Close [[[#]文件号1] ,[[#]文件号2]…]

(1)关闭1号文件：close  #1

(2)关闭所有文件：close all 或 close

相关函数讲解

Input

Input：Input (字节数，[#]文件号)

        从文件的访问当前位置读入指定字节数的数据。仅适用于顺序文件和二进制文件。

EOF

EOF：EOF(文件号)

        判断文件的访问位置是否在文件尾，如果是，返回True，否则，返回False。

冬季学VB正当时1VB视频学习教程特惠发放

VB基础入门教程、VB从入门到精通全套视频教程、VB与数据库开发专项讲解视频、串口通信视频教程特惠发放，助力大家高效学习！

2VB视频直播讲解开启

从VB零基础开始讲解，循序渐进，每节结合实际例子，每个知识点详细讲解，一对一单独指导讲解，轻松掌握VB编程！

适合VB零基础、VB基础薄弱需要考试的同学以及工作需要的朋友学习。

VB编程学习中有问题或者需要视频讲解资料可添加下图老师微信号，学习问题在线答疑。

祝大家学习成功！

---

跟我学VB

帮助你顺利掌握VB编程语言