¿Cómo implementar la recepción hexadecimal en la comunicación serie vb?
Para lograr la recepción hexadecimal, es esencialmente recibir en binario.
Establezca el atributo InputMode = comInputModeBinary 'Recepción binaria'
Después de recibirlo, conviértalo a caracteres hexadecimales mediante la función HEX String mostrar
Opciones explícitas
Dim strData como cadena
Dim bytInput( As Byte
Subp privado> Dim strData como cadena
Dim bytInput() como byte
Private Sub MsComm1_OnComm()
Dim intInputLen como entero
Seleccionar caso Me.MSComm2.CommEvent
Caso comEvReceive
'Agregar código para manejar la recepción aquí
MSComm1.InputMode = comInputModeBinary 'Recibir en binario
intInputLen = MSComm1 .InBufferCount
ReDim bytInput(intInputLen)
bytInput = MSComm1.Input(intInputLen)