没有合适的资源?快使用搜索试试~ 我知道了~
用VB进行串口实时数据采集.docx
1.该资源内容由用户上传,如若侵权请联系客服进行举报
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
2.虚拟产品一经售出概不退款(资源遇到问题,请及时私信上传者)
版权申诉
0 下载量 142 浏览量
2022-11-14
23:23:23
上传
评论
收藏 57KB DOCX 举报
温馨提示
试读
5页
。。。
资源推荐
资源详情
资源评论
用 VB进行串口实时数据采集
长沙交通学院信息与计算科学系 (410077) 李湘江
---- 本文介绍 VB6.0 利用 MSComm 通信控件,开发微机通过串口对工业仪表进行实时数据
采集的编程技术。给出的程序代码具有通用性,并有详细的注释,可以直接或稍加改动后用
于其他数据采集或实时控制程序中。
----一台工业专用实时检测仪表,接高精度位移传感器,用于测量微小形变或微量位移,仪
表测量精度为 0.01 毫米,测量范围最大值为 50 毫米。该仪表带有一个 9 针的 RS-232C 串
口,能与微机进行串口数据通信,实时传送检测数据,通过微机软件处理可实现工业实时监
控。
----该仪表的串口数据通信协议是:数据传输速率为 9600bps,1 位开始位,8 位数据位,1
位停止位,无奇偶校验位。仪表每秒发送 50 帧检测数据,每帧数据由 4 个字节组成。第一
个字节定义为二进制常数 0F0H,是每帧数据开始的标志字节;后面连续 2 个字节为数据字
节,采用压缩的 BCD 码编码方式,高位在前,低位在后,即一个字节表示两位十进制数,
则两个字节表示四位十进制数,小数点采用固定形式,定义在两字节中间;第四个字节为符
号字节,该字节第八位为 1,即:
----则为负数;第八位为 0,即:
----则为正数。
----例如:0F0H 26H 87H 80H 0F0H 34H 62H 00H 表示 -26.87 34.62。
----通信传输速率为 9600bps,则最快速度 1.04ms 发送一个字节,仪表每秒发送 50 帧数据,
每帧数据有 4 个字节,即每秒发送 200 个字节,平均 5.0ms 发送一个字节,连续读取串口
数据时要在程序中添加循环等待程序。
----为了实现实时监测功能,接收数据的读取要尽可能的快速,则设置 MSComm1 的属性如
下:
RThreshold = 1
接收缓冲区收到一个字节产生 OnComm 事件
InputLen = 1
每次读取一个字节
----仪表每秒发送 50 帧数据,微机收到一帧完整数据至少需要 20 ms 时间,然后再进行数据
资源评论
不吃鸳鸯锅
- 粉丝: 8302
- 资源: 2万+
上传资源 快速赚钱
- 我的内容管理 展开
- 我的资源 快来上传第一个资源
- 我的收益 登录查看自己的收益
- 我的积分 登录查看自己的积分
- 我的C币 登录后查看C币余额
- 我的收藏
- 我的下载
- 下载帮助
安全验证
文档复制为VIP权益,开通VIP直接复制
信息提交成功