如何在VB6.0的RS232通信时显示16进制数 点击:1164 | 回复:0



cloud0814

    
  • 精华:0帖
  • 求助:0帖
  • 帖子:3帖 | 3回
  • 年度积分:0
  • 历史总积分:12
  • 注册:2006年8月23日
发表于:2006-08-24 09:44:00
楼主
小弟我在用VB6.0进行RS232的通信编程,用的MSCOMM,现在通信口有一组16进制的数接收。但只能显示乱码,如何编写能正确显示。并且能处理得到10进制数组
我的程序很简单:
Private Sub MSComm1_OnComm()
  
    Select Case MSComm1.CommEvent '选择事件
    Case comEvReceive '接收到字符
    Dim bytin() As Byte
    'MSComm1.InputMode = mscommlib.InputModeConstants.comInputModeBinary
    'MSComm1.InputLen = 0
    bytin = MSComm1.Input
    
Text2.Text = bytin '...接受显示数据

MSComm1.InBufferCount = 0 '...清空输入寄存器
End Select


热门招聘
相关主题

官方公众号

智造工程师