高手帮忙:VB编程

来源:百度知道 编辑:UC知道 时间:2024/05/22 10:24:04
MSCOMM控件如何接收下位机上传的十六进制数据,并用十六进制显示.数据每两个字符为一个字节.格式为:AA********BB.其中第一字节AA为帧同步,第六字节BB为帧结束,*表示的为数据.第五字节**为第二,第三,第四字节的校验和.先谢谢拉!!!!!!!

产生OnComm事件后进行一下处理:
Private Sub MSComm1_OnComm()
Select Case MSComm1.CommEvent
Case comEvReceive
Dim getdata() As Byte, i%, buffer$
buffer = ""
getdata = MSComm1.Input
num = UBound(getdata)
ReDim count(0 To num) As Integer
For i = 0 To num
count(i) = getdata(i)
buffer = buffer + Hex(getdata(i)) + " "
Text2.Text = buffer
Next i
End Select
End Sub
握手协议可以自己写。