vb6获取硬件识别码_基于VB6.0与485仪表的Modbus RTU通信含代码

前言

在写这边文章时,很纠结,到底要不要写呢?原因主要有3个:第一、VB6.0这么古老的语言现在还有人用吗?现在不是很流行C#、Python、Java……吗?第二、对于预算充足的项目,开发人员看不上。第三、个人水平有限,怕闹了笑话。纠结半天,既然我自己都在应用,网上也有网友提问过类似问题,看来“项目资金不足”的同行也不少,所以还是挤点时间谢谢啦,不足之处还请大家批评指正。同时,非常感谢我在整理资料,实验测试过程中提供帮助的各位朋友。

1、测试环境

(1) 安装有Microsoft Visual Basic 6.0 软件的PC;

(2) 一个RS485-USB转换头,因为个人笔记本目前没有通信串口,所以需要该转换头;

(3) XY-MD02温湿度传感器,支持RS485 Modbus RTU通信。

2、准备工作

(1) 上位机画面窗口控件布放。打开Microsoft Visual Basic 6.0 软件,按照如下图示和方法编辑窗口画面。图中我做了3个仪表的数据采集,其方法和原理跟做一个仪表的方法原理一样。

e8a39e858bca03215d0bb8b0d0a689a6.png

如图上图所示,各个控件的主要属性设置如下:

9b7791bf7efd7be33ece51fd3561063c.png

画面中2号和3号的仪表类似,这里不再详细说明。

(2) 查阅XY-MD02温湿度传感器的Modbus报文资料,如下图所示:

c47c1957917b73502b1abbde1dc3b132.png
8192e7fd7fcfd6d6168edb7cbc0374ac.png

(3) 根据温湿度传感器报文,编写画面读取程序。该项目的完整程序如下图所示:

3ed803b16dc564bc64ac63406293f522.png
0a960dde5a4d8d5793c8656806ff7647.png
a0e81fd47534a80104f79f1c1a6a3406.png
401359c9e175870c91e239ab1b0a0c8d.png
39fb025db4e547a0639e50a98ae0ed3a.png
3f453375872b0b570328e9add9afcfc3.png
0237ba3de2bf51940fbaf1a97aadce21.png
1c8a9cb1c52b2f07f9cd3123fbdce608.png
d51c2e032ce00e49666615a4afad1b1c.png
92d62eb70674698fde6bd150d57ce890.png
af1721581c3a044d5854d9f8b11ab01a.png
9d406ca4114698015396f2b7358f7fa8.png
  • 由于代码格式问题,Word文档不能很好的粘贴源码,所以只能截图了。需要源码的朋友,可以进入“剑指工控微信群后,与群管理员联系获取。或者加: zjing_micky,以上就是完整代码截图。

3、测试

代码编写完成后,开始硬件连接。然后运行测试。如下图所示。

22628103484ac711e15a8eb6e4607f07.png
4697f6b911e1d092298271517a38e618.png

注意事项:电脑识别的COM口必须在串口下拉菜单中可以选择,如果电脑识别出的COM口不在串口下拉菜单中,则需要修改电脑串口属性。

通过测试,温湿度传感器的温湿度数据反馈正常。上位机编写完成。

声明:以上代码有从网上复制引用的,有朋友提供完善修改的,在此再次感谢各位给予帮助的朋友。希望本文能够给对各位读者启发和帮助,第一次写类似文章,不足之处还请见谅。

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值