Visual Basic 2010 |
Private Sub serialButton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles serialButton.Click Dim dana As Integer Dim wynik As String dana = 12345 wynik = Hex(dana) SerialPort1.Write(wynik) End Sub Serial Port wysyła cztery bajty ascii 33 30 33 39 zamiast dwóch bajtów hex 30 39 |