Private serialPort1 As System.IO.Ports.SerialPort
Sub Button2Click(ByVal sender As Object, ByVal e As EventArgs)
Serialport1.Write (chr(4)) ' -> Lleva el valor correcto (0x04)
Serialport1.Write (chr(130)) ' -> Error, llega el valor 0x3f
End Sub