转贴：visual basic通信程序设计

《转贴：visual basic通信程序设计》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、转贴：VisualBasic通信程序设计作者：jaklinemail:cjl-ccy@china.com日期：2001-7-1010:48:14VisualBasic通信程序设计　　VisualBasic中通信控件及其在windows平台下的通信软件设计方法，并结合具体实例给出了基本的通信程序。　　1992年crescentsoftwareinc.公司专为VB设计了mscomm.vbx用户通信控件，它提供了通过串口发送和接收数据的串行通信能力，不但包括了全部WindowsAPI中关于串行通信的16个函数所完成的功能，而且开拓了更多的使用户设计方便的对象属性来满足不同

2、用户不同业务的需求。目前国内众多的vb资料中很少涉及该通信控件的介绍，本文将详细介绍mscomm.vbx通信控件及编程方法，并结合工作中的一个实例给出基本通信程序。　　1mscomm.vbx通信控件描述　　mscomm.vbx通信控件可直接从vb的toolbox中加入窗体form，即可用其进行通信。若toolbox中无此控件，则用tools的customcontrols将mscomm.vbx从windows的system子目录中加入vb的toolbox中。　　1.1通信方式　　mscomm.vbx有2种不同的方式来处理和解决各类通信软件的开发和设计问题　　1、事件驱

3、动。它与c/c++写windows软件时的窗口回调函数类似，是1种功能强大的处理问题的方法。在实际工作中，往往要处理许多通信中的相关事件，例如：当线路数据到达本端或cd线和rts信号线状态发生变化时，要求我们使用相应的事件来跟踪和处理，该控件是使用oncomm事件来实现的，它也包括检测和处理通信错误等方面的问题，commevent值返回最近的通信事件或错误的数字代码。通信控件详细的错误和事件举例有：　　mscomm-er-break收到1个breaksignal　　mscomm-er-cdtocd信号超时　　……　　mscomm-ev-cdcd信号改变　　……　　2

4、、查询方式。由程序设计者负责读取commevent的值并处理所发生的错误或事件。通常简单的应用程序设计可采用这种办法。　　1.2通信控件的属性　　利用通信控件编制通信程序，关键是准确理解设置通信控件的属性。mscomm.vbx提供了27个关于通信控件方面的属性，例如：　　commport：设置或返回通信口编号。　　settings：设置或返回以字符串形式出现的数据通信格式：波特率、校验、数据位和停止位。　　portopen：设置或返回通信口状态（包括打开和关闭1个通信口）　　……　　3、实例　　本程序应用背景为dcc95型静电除尘器自动监控系统软件，解决1个pc工控

5、机（主站）与32个单片机（子站）之间的通信问题。主站与子站之间这总线式网络结构，采用rs-485通信标准，以问答方式进行数据通信。由于32个子站与主站发送通信命令（下行命令），主站在接收子站发回的相应回答命令（上行命令）后继续发送下行命令的通信形式。根据系统功能的要求，主站需发送2种类型的命令：（1）同期命令，它由定时器触发引起，每隔ls周期发送1次；（2）非周期性命令，它由操作者按动相应命令按钮引起，非周期性发送。自动监控系统软件安装在主站上，而通信程序作为自动监控系统软件的一部分也安装在主站上。　　本文仅列出调试通信程序时进行试验用的基本演示程序清单。试验时，用

6、1台pc机作为主站，另一台pc机模拟32个子站的工作，两台pc机之间采用rs232c串口通信。往主站的通信演示程序窗体（form）中加入1个通信控件、2个定时器控件和1个命令按钮控件，通信控件（mscomm1）用于访问串口，发送和接收数据；periodic定时器控件（periodic）用于控制每秒由主站向各子站发送周期性命令；命令按钮控件(nonperiodic-command)与nonperiodic定时器控件（nonperiodic）用于发送非周期性命令。数据传送采用事件驱动的通信方式，根据不同的发送命令设置rtreshlod属性，从而引起oncomm事件以接收

7、数据。　　2.1窗体各控件初始化程序　　设置通信串口工作参数，设置periodic定时器的在断间隔为ls,nonperiodic定时器的中断间隔为0.5s。　subform-load()　　mscomm1.commport=2’选用com2串行口　　mscomm1.settings="9600，n8，1"　　’波特率9600，无奇偶校验位，8位数据位1位停止位　　mscomm1.inputlen=0’input将读取接收缓冲区的全部内容　　mscomm1.inbuffersize=1024’设置接收缓冲区的字节长度　　mscomm1.portopen=true’