发表于: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