vb 串口如何发送 asc码

来源:百度知道 编辑:UC知道 时间:2024/07/04 10:06:10
用mscomm控件,发送的数据格式是什么啊?如何以acs码的形式发送“*0100PGR回车”这个字符串?注:回车表示的是控制符!请高手帮忙给个程序段说明一下,谢谢!!!急
通讯的设备接受的是acs码格式的控制字,返回的也是acs码

MSComm1.InputMode = comInputModeBinary '设置发送模式为二进制
'其它设置略

'构造数据:
Dim cmd() As Byte

Dim data As String
data = "*0100PGR" & vbCrLf

ReDim cmd(Len(data) - 1)

Dim i As Integer
For i = 0 To UBound(cmd)
cmd(i) = Asc(Mid(data, i + 1, 1))
Next

'发送
MSComm1.Output = cmd

这就是asc码的,windows里回车符是两个字符,如果用其它控制字符,就代替为data = "*0100PGR" & chr(控制字符asc码)