VB 的MsComm控件十六进制字符接受问题
PrivateSubMSComm1_OnComm()IfMSComm1.CommEvent=2ThenMSComm1.InputLen=0strBuff=MSComm1....
Private Sub MSComm1_OnComm()
If MSComm1.CommEvent = 2 Then
MSComm1.InputLen = 0
strBuff = MSComm1.Input
sData() = strBuff
For i = 0 To UBound(sData)
If Len(Hex(sData(i))) = 1 Then
strdata = strdata & "0" & Hex(sData(i))
Else
strdata = strdata & Hex(sData(i))
End If
中的for循环是什么意思啊,if。。else 又是什么意思。十六进制接受“E”的话,是接受的&H0E,还是E的ASCII码?有点晕了,算字符长度len(&HE)算一个字节码? 展开
If MSComm1.CommEvent = 2 Then
MSComm1.InputLen = 0
strBuff = MSComm1.Input
sData() = strBuff
For i = 0 To UBound(sData)
If Len(Hex(sData(i))) = 1 Then
strdata = strdata & "0" & Hex(sData(i))
Else
strdata = strdata & Hex(sData(i))
End If
中的for循环是什么意思啊,if。。else 又是什么意思。十六进制接受“E”的话,是接受的&H0E,还是E的ASCII码?有点晕了,算字符长度len(&HE)算一个字节码? 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询