锐英源精品开源心得，转载请注明：“锐英源www.wisestudy.cn，孙老师作品，电话13803810136。”需要全文内容也请联系孙老师。

背景

锐英源VB培训采用通俗易懂的语言组织VB教程，集成了南方工业设备公司和锐英源合作VB开发的经验，融合了郑州富士康员工开发工业数据软件的指导经验，适合爱好者和考试者培训学习。

VB通信协议数据处理是经常用的一种技术，这里列出了教学大纲的前面部分，VB通信协议数据处理视频收费30元，练习在线教育和VB通信协议数据处理答疑70元，转帐给支付宝lookfar@163.com或微信ryysoft，注明：“VB通信协议数据处理视频”或“VB通信协议数据处理视频和答疑”。

VB自学者通过我们的VB通信协议数据处理教程也能获益良多，谢谢关注。

目录

是工业设备控制软件的核心
读
写
数据处理，单个数据处理，成组数据处理
界面处理，单个数据处理，成组数据处理
类似任务代码模块化处理
多任务协调，这个是VB培训的精华，学成独立开发能力的关键
商业项目讲解剖析：匝间波形采集

工业设备控制软件的核心

是通过难度和复杂度来说是核心
通信是控制的必用功能
各个硬件通信方式不一样带来复杂度
每个通信属性都要解析和处理正确才会让系统正常
设备之间通信有交互要求，有时序要求，有控制要求，有参数要求
设备运行环境非常苛刻，有时只有现场才有设备

读

Private Sub MSComm2_OnComm()
byteinputlen = MSComm2.InBufferCount
byteinput = MSComm2.Input
上面是串口的形式
其它的通信方式也是类似，读在条件满足时，得到一个结果缓冲和长度
对缓冲里的数据进行分析

写

Sub COM_功率读结果() '读结果'''''''
On Error GoTo ERRHANDLE’错误处理
Dim outstring(0 To 6) As Byte’定义发送缓冲
Dim i As Integer Dim temp As Integer
outstring(0) = &H7B outstring(1) = &H7 outstring(2) = &H0 outstring(3) = &H4 ‘Result outstring(4) = &H0 ’data-step outstring(5) = &H99 outstring(6) = &H7D’对缓冲进行赋值，缓冲是数组0-6在VB里有7个位置
temp = 0
For i = 1 To (outstring(1) - 3)
temp = temp + outstring(i) ‘算校验和，累加计算，是简单的模块
Next i
outstring(outstring(1) - 2) = temp Mod 256’outstring(1)里的数值是7，相当于outstring(5)=temp按256取余，这是通信约定
frm_系统运行.MSComm3.Output = outstring '发送数据
Exit Sub
ERRHANDLE:
End Sub

VB通信协议数据处理教程GIF