研究用visual basic 5.0开发无线通讯数据采集应用程序

《研究用visual basic 5.0开发无线通讯数据采集应用程序》由会员上传分享，免费在线阅读，更多相关内容在学术论文-天天文库。

1、研究用VisualBasic5.0开发无线通讯数据采集应用程序：本文通过对无线通讯系统基本工作原理的分析，阐明了采用VisualBasic5.0中的控件MSM.VBX进行无线数据采集程序开发的基本方法。并结合900M频率无线通讯电台的特征，给出了基本通讯接口源程序代码。：VB5无线通讯控件1引言目前对于用于数据采集和传输的无线设备之间的通讯编程，一般仍采用C语言和汇编语言较多，这主要是由于在编程时，要涉及到对无线通讯设备硬件的控制，因此，选择C语言和汇编语言的较多。采用以上两种语言进行编程，对于一般的编

2、程职员来讲，很难较快的把握。本文采用可视化的编程环境从根本上解决了以上新题目，只要有一定编程基础的技术职员，均可实现自己编程。2无线通讯设备的基本工作原理在无线的通讯方式中，数据传输的基本原理可以以为是通过调制解调器进行工作的，而这种调制解调器是无线方式工作的，它不含有拨号功能，而且和它直接连接的是无线电台。无线电台的功能就相当于有线传输中的线，它是通过无线电波进行发送和接受信号的。而无线调制解调器的功能是将二进制的信号调制成可以在无线电台之间传输的无线电波。信号转换过程的属性取决于调制解调器所接收到的

3、源信号和目的信号。一般来说，调制解调器从终端或计算机接以串行方式收到二进制信号后，将它们转换成了音频信号。然后调制解调器将这些声音通过无线电台传输出往。在接受端，另一个兼容的调制解调器将这些声音信号转换成了二进制信号，并把这些二进制信号发送给终端或计算机。由于在无线电台之间有过滤和放大功能，同时，无线电波的传输受很多因素影响，因此传送的速度受到限制。下面给出了一种900M电台的技术特性见表1。本程序就是使用的这种电台，对于其它参数的电台，其基本原理也是一样的。表1900M无线电台的技术指标项目指标含义传

4、输速率1.2Kbps或2.4Kbps每秒的字节数数据的控制透明传输发射功率3soBodyTextIndentstyle="MARGIN:0cm0cm0pt;TEXT-INDENT:0cm;LINE-HEIGHT:20pt">接受灵敏度-105dBm工作频率915—917MHZ信道158个3无线数据采集的编程由无线通讯的基本原理可以看出，无线的数据采集和传输主要包括以下几个过程，从带处理器的传感器或计算机终端发送二进制信号到无线调制解调器；无线电台之间建立连接并传输数据；从另外一真个电台接受二进制数据；将

5、数据传输到计算机。因此，要建立无线设备之间的通讯必须在两端进行编程。从计算机终端到无线电台的数据传输是通过计算机的串行口进行的，通过对串行口进行编程就可以实现向电台发送数据。在VisualBasic5.0中的控件MSM是进行串口通讯的。通过设定控件MSM的属性，可以用VB5.0对其进行灵活的编程，控件MSM同时支持事件驱动及轮询方法。控件MSM能天生一个名为Onm的事件，它能能捕捉的事件范围包括通过串口接受数据以及碰到任何错误等等。事件或错误的值以整数的形式保存在mEvent属性里。可根据mEvent属

6、性判定最近一次事件或错误。也可以在程序中设置一个循环，每次循环都直接检查mEvent属性的值，从而对事件及错误进行“轮询”。假如应用程序规模小，这种方法相当完美。下面的部分程序代码是计算机和900M无线电台之间的传输程序，本程序已经在486计算机和PII586上调试通过。1从串口读进电台数据程序GetStringFromm()功能:(1)主要完成从端口获得数据,将二进制的数据转换为ASCII码数据PublicFunctionGetStringFromm()AsString定义变量（略）IffrmTerm

7、inal.MSm1.InBufferCount%26lt;7ThenGetStringFromm=""ExitFunctionEndIf'//读进标志码frmTerminal.MSm1.InputLen=6ReDimPreserveBinDataarr(6)AsByteBinData=frmTerminal.MSm1.InputBinDataarr=BinDataUserDataLenth=BinDataarr(5)'用户数据的长度soNormalIndentstyle="MARGIN:0cm0cm0p

8、t;LINE-HEIGHT:16pt;mso-line-height-rule:exactly">IfBinDataarr(5)%26gt;frmTerminal.MSm1.InBufferCountThen'未接受完数据delay6'延时6sGoTosoNormalIndentstyle="MARGIN:0cm0cm0pt;LINE-HEIGHT:16pt;mso-line-height-rule:exactly">EndIffrmTer