API接收串口数据问题
VB应用API做的串口通信，假如接收二进制发的1，接收到的是313130303031，这是为什么？怎么正确的获取发送数据呢？

VB code

 '从串口读取数据 Function ReadCommPure() As String On Error GoTo handelpurecom     Dim RetBytes As Long     Dim i As Integer     Dim ReadStr As String     Dim retval As Long     Dim CheckTotal As Integer     Dim CheckDigitLC As Integer     retval = ReadFile(ComNum, bRead(0), 255, RetBytes, 0)     ReadStr = ""     If (RetBytes > 0) Then         For i = 0 To RetBytes - 1             ReadStr = ReadStr & Hex(bRead(i))             If Len(Hex(bRead(i))) = 1 Then                 strData = strData & "0" & Hex(bRead(i))  '转为16进制显示             Else                 strData = strData & Hex(bRead(i))   '转为16进制显示             End If         Next i        Else         FlushComm     End If     ReadCommPure = ReadStrhandelpurecom:     Exit Function End Function

[解决办法]
原理在这儿
[解决办法]
显然发送端发送的是 ASCII 码。

313130303031 = "110001"
[解决办法]
弱弱的问句，代码是OK的，那是不是你调试的问题？本机调试吗