![](https://csdnimg.cn/release/download_crawler_static/87468832/bg1.jpg)
VB 串口通信
目前,Visual Basic (简称 VB) 已成为 WINDOWS 系统开发得主要语言,以其高效、简
单易学及功能强大得特点越来越为广大程序设计人员及用户所青睐。VB 支持面向对象得程
序设计,具有结构化得事件驱动编程模式并可以使用无限扩增得控件。在VB 应用程序
可以方便地调用 WINDOWS API 函数,使得编程效率提高,应用功能增强。
利用 VB 提供得这些功能,我们可以有三种方法完成串口通信。一种就是用 VB 提供得具
有强大功能得通信控件;另一种方法就是调用 WINDOWS API 函数,使用 WINDOWS 提供
得通信函数编写移植性强得应用程序 ;第三就是利用文件得输入/ 输出完成,该方法简便易
行,但有一定得局限性。
一、利用通信控件(MSCOMM) 完成串口通信
VB 提供了通信控件 MSCOMM,文件名为 MSCOMM、 VBX。该控件可设置串行通信得
数据发送与接收,对串口状态及串行通信得信息格式与协议进行设置。在通信过程中可以触
发 OnComm 事件,在该事件过程进行数据检验处理及检错,还可以通过编程访问 CommEvent
属性来了解通信得情况,进行收发数据得处理。每个通信控件对应一个串口,如果要访问多
个通信口,则要设计多个通信控件。
1、通信控件得事件及基本属性
(1)事件
OnComm:通信控件只提供了一个事件,该事件得触发可以对串口得通信事件及错误进行处
理。通过对 CommEvent 属性得判断可知当前得通信错误与事件,分别对每个 CommEvent 值
进行编程就完成了对各个错误与事件得处理。如:CommEvent = MSCOMM—EV—SEND 表
示发送事件。这些信息可从 VB 提供得常量文件 CONSTANT、 TXT 中查出。
(2)属性
CommPort :设置通信控件与哪个串口相连接,设置并返回通信口号。
Setting :设置通信得信息格式,为字符型。顺序为:波特率、校验、数据位、停止位。
PortOpen :布尔型、开关通信口。
InputLen :从接收缓冲区读取字符个数。
Input ,Output :读取接收缓冲区或写入发送缓冲区字符。
以上五种属性对串口完成基本得设置与操作,下面得三种属性就是描述如何利用 VB 提供
得事件驱动机制来实现通信。
CommEvent :返回通信过程中产生得错误信息及事件,了解通信状况。
SThreshold :设置并返回不触发 OnComm 事件时发送缓冲区被允许得最少字符数。当缓冲
区得字符少于设置得值时,则触发 OnComm 事件,并把 CommEvent 设为 MSCOMMM—
EV—SEND。当 SThreshold = 0 则禁止发送触发 OnComm 事件,当 SThreshold = 1 则发送
缓冲区为空时就触发 OnComm 事件。利用这一属性,就可完成发送数据后得一系列操作。
如:对刚发送得数据进行处理,当串口就是与 MODEM 通信时,发送完数据后可进行拆除
线路联接、挂机等操作。
RThreshold :设置并返回不触发 OnComm 事件时接收缓冲区被允许得最多字符数。当缓冲
区得字符多于设置得值时,则触发OnComm 事件,并把 CommEvent 设为 MSCOMM—EV
—RECEIVE,当 RThreshold = 0 则禁止接收触发 OnComm 事件,当 RThreshold = 1 则接收
缓冲区有一个或更多字符时就触发 OnComm 事件。利用这一属性,就可完成对串口接收数
据得处理。
2、利用通信控件得实例
Sub Form1 —load ()
form1、 show