用VB实现串行通信的开发应用

5
图FL U K 表R S 3接口与机5针串口连线示意图
用VB 实现串行通信的开发应用
○刘玉志
李昌禧
VB (V isual B a sic )具有良好的图形用户接口(GU I )并支持面向对象的程序设计,使得以前用B C ++、VC ++进行W indow s 编程的复杂性局面得到了改观。这得益于V B 近乎无限的可扩展性,首先表现在V B 可直接使用用户自定义控件V B X 或OC X 文件;其次表现在V B 可调用动态链接库(DL L )里众多的W indo ws API 函数。这不仅大大扩充了程序的设计能力,而且使VB 可以实现原来只有B C ++或VC ++才能完成的功能,如串口编程等。
对于VB 的通信控件的介绍,目前国内众多的V B 应用资料中较少见到,本文以使用广泛的美国生产的FLU K E45万用表(以下简称FLU KE 表)测量参数的自动记录与数据管理通信程序开发为例,介绍VB 中通信控件的特性和应用。
一、通信机制
真空浸漆
FLU K E 表接收上位机传来的某一AS CI I 码命令后就执行相应的功能,其预留的9针R S -232接口与上位P C 机的25针串口连线如图1所示。
P C 机串口的模拟地与数字地要接在一起,否则通信时可能发生错误。
主要通信命令及功能(仅与电阻测试有关)如表1所示。
V isual B a sic 的灵活性很大程度上表现为它的控件(V B X)的可扩展性,它定义了VB X 的外部标准,可以使用许
多独立软件公司编写的基于VB 的VB X 控件。M S C om m 16.V B X 、M S C om m 32.VB X 就是由C r esc ent So ftw ar e 公司为M icr osoft 开发的包含在VB 套装软件中用于开发16位和32位Windo w s 串行通信的控件。使用前只需从T ool 子菜单的Custum C ontro ls 中把M S C om m 控件调入工具框中即可使用。
VB 的通信控件有一个通信事件(OnC om m 事件),27个属性及2个通信函数。大部分属性仅和M ode m 连接串行通信时才使用,常用重要的属性分述如下:后结构主义
C om m port :指定使用某一串行口通信,缺省值为C OM 1;可设置1~16个,但每个通信控件只对应一个串口。
Settin g s :初始化串口通信参数,包括波特率、奇偶校验、数据位数、停止位数;VB 4.0最大波特率可达19200b /s ,V B 5.0可达28800b/s 。
I nput :读入并清除接收缓冲区字符,每次读入个数由In -putle n 属性决定;若无I nputlen 个数的字符,则返回0长度字符“";读取前用户可检查InB uf fer C ount 属性值以确定接收缓冲区是否已达到I n p utlen 个数的字符。
I n p utlen :每次In p ut 读入的字符个数,缺省值为0,表示读取接收缓冲区全部内容。
I nB uf f erS iz e :设置接收缓冲区的大小,缺省值为1024字节。计算机保护条例
I nB uf f erC o unt :返回接收缓冲区中已接收的字符数,通过
置0可清除接收缓冲区。
导引头Out p ut :写数据到发送缓冲区,可传送文本或二进制数据,数据须声明为V ariant 变量。
OutB uf f erS iz e :设置发送缓冲区的大小,缺省值为512字节。
OutB uf f erC o unt :返回发送缓冲区中等待发送的字符数,通过置0可清除发送缓冲区。
PortO p en :通信开始前打开串行口。PortC lose :通信结束后关闭串行口。
ST 设置某一数值,一旦发送缓冲区的字符数降低到少于该设定值时,就会置属性为M S OM M —V —S ND,且O 事件被触发,其缺省值为
表1
电阻测试的命令
紧箍咒口诀
计算机与通信1998年第1期
软件天地
数据执行保护命令类型代码功能
功能设置命令OHM S 万用表设置成电阻测试状态结果查询命令
M E AS?
使万用表返回测试结果
21E -22PC 2hr eshold :C om m Event C E E nC om m

本文发布于:2024-09-22 19:25:43,感谢您对本站的认可!

本文链接:https://www.17tex.com/xueshu/500072.html

版权声明:本站内容均来自互联网,仅供演示用,请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系,我们将在24小时内删除。

标签:控件   字符   使用   功能   数据   串口
留言与评论(共有 0 条评论)
   
验证码:
Copyright ©2019-2024 Comsenz Inc.Powered by © 易纺专利技术学习网 豫ICP备2022007602号 豫公网安备41160202000603 站长QQ:729038198 关于我们 投诉建议