VBで、シリアル通信(COMポート)から、バイナリデータを受信したいのですが、サンプルプログラムでは文字列受信の設定になっているようでして、
末尾にNULコードが必要ですが、バイナリデータを受信するにはどのように
修正すればよろしいでしょうか
参考にしたサイトはこちらで
http://kana-soft.com/tech/sample_0008.htm
<受信の箇所>
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 String data = SerialPort1.ReadExisting() '受信したデータをテキストボックスに書き込む. 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
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2016/11/30 05:59
2016/11/30 06:58 編集
2016/11/30 08:36
2016/11/30 09:05
2016/11/30 10:27