Dim testby() As Byte
    Dim buf As String
        testby = StrConv("12A中文", vbFromUnicode)
''''this line
    buf = StrConv(testby, vbUnicode)
    MsgBox buf

解决方案 »

  1.   

    1.首先将你的到字节是10进制数,把他们转换成16进制,
    2.这16进制数就是字符的acsii码,你转成字符就可以了
      

  2.   

    阿甘兄,再加一个问题。
    在使用RThreshold=1激发OnComm事件中,
    如果使用字符方式,串口是不是8个字符8个字符的触发OnComm事件;我做过实验似乎是这样。
    如果使用字节形式,又会是怎样呢?
      

  3.   

    TRheshold是代表缓冲区达到多少个字符触发OnComm事件
    设置为0不触发二进制也是一样的