投稿者 vb素人  (社会人) 投稿日時 2017/7/5 14:59:51
kiku様

回答ありがとうございます。
教えていただきました通り、
MessageBox.Show(BitConverter.ToString(dat)) 
に変更してみましたところ、

メッセージBoxには、「FF-FF-FF」が表示されます。(FF-FFが連続して表示)
⇒送信しているデータは、1023なので、「FF-03」または「03-FF」と表示されると考えていましたが、
なぜか「FF-FF」となってしまいます。

その後、次のメッセージが表示されます。
「型'System.Byte[]'のオブジェクトを型'System.String'に変換できません」


テストした際のコードを掲載させていただきます。


    Private Sub SerialPort1_DataReceived(ByVal sender As System.Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived

        If SerialPort1.IsOpen = False Then
            Return
        End If

        Try
             Dim data As Byte() = New Byte(SerialPort1.BytesToRead - 1) {}
            SerialPort1.Read(data, 0, data.GetLength(0))

            MessageBox.Show(BitConverter.ToString(data))

            '受信したデータをテキストボックスに書き込む.
            Dim args(0) As Object
            args(0) = data
            Invoke(New Delegate_RcvDataToTextBox(AddressOf Me.RcvDataToTextBox), args)
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

    End Sub


    Private Sub RcvDataToTextBox(data As String)

        '受信データをテキストボックスの最後に追記する.
        If IsNothing(data) = False Then
            RcvTextBox.AppendText(data)
        End If

    End Sub