Salve,
non son molto ferrato in VB, maquello che vorrei ottenere e' ricevere dalla seriale un carattere e visualizzarlo in formato esadecimale per capirne l'esatto valore e non un simbolo ascii irriconoscibile.
esempio

Private Sub MSComm1_OnComm()
Dim Rx$
Rx$ = MSComm1.Input ' Leggo il contenuto del buffer di ricezione (e svuoto .Input)
If Len(Rx$) Then ' Se ho ricevuto qualcosa lo scrivo nella TextBox
Text1.Text = Text1.Text & Rx$
End If
End Sub

come lo modifico?