VB串口通信详解.doc

VB串口通信目前，VisualBasic（简称VB）已成为WINDOWS系统开发得主要语言，以其高效、简单易学及功能强大得特点越来越为广大程序设计人员及用户所青睐。VB支持面向对象得程序设计，具有结构化得事件驱动编程模式并可以使用无限扩增得控件。在VB应用程序可以方便地调用WINDOWSAPI函数，使得编程效率提高，应用功能增强。利用VB提供得这些功能，我们可以有三种方法完成串口通信。一种就是用VB提供得具有强大功能得通信控件;另一种方法就是调用WINDOWSAPI函数，使用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、利用通信控件得实例SubForm1—load（）form1、show′设置COM1comm1、commport=1comm1、Setting="9600，o，8，1"′波特率:9600奇校验，8位数据，1位停止位comm1、Inputlen=0′读取接收缓冲区得所有字符comm1、OutBufferSize=512′设置发送缓冲区为512字节comm1、InBufferSize=512′设置接收缓冲区为512字节comm1、SThreshold=0′禁止发送事件comm1、RThreshold=1′每一个字符到接收缓冲区都触发接收事件′设置COM2comm2、commport=2comm2、Setting="2400，e，8，1"′波特率:2400偶验，8位数据，1位停止位comm2、Inputlen=0′读取接收缓冲区得所有字符comm2、OutBufferSize=512′设置发送缓冲区为512字节comm2、InBufferSize=512′设置接收缓冲区为512字节comm2、SThreshold=1′发送缓冲区空触发发送事件comm2、RThreshold=0′禁止接收事件′打开COM1，COM2comm1、Portopen=Truecomm2、Portopen=TrueTimer1、interval=5000EndSubSubComm1—OnComm（）DimInbuffasstringDimiasinteger，nasintege