RS232Cによるバイナリデータを送受信するには？ (ID:117577)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 はじめまして。 現在，温度計をRS232C通信でリアルタイムにデータを取得しています。 通信仕様書によると，1バイトの「0x0B」バイナリデータを送信すると， 10バイトのバイナリデータが返ってくるとありますが，「208」としか 返ってきません。どの部分がおかしいのでしょうか？コードは以下です。 -------------------------------------- Private Sub Command1_Click() MSComm1.CommPort = 1 MSComm1.Settings = "1200,n,8,1" MSComm1.InputLen = 0 MSComm1.RThreshold = 1 MSComm1.SThreshold = 1 MSComm1.PortOpen = True MSComm1.InBufferCount = 0 MSComm1.InputMode = comInputModeBinary MSComm1.Output = Chr(&HB) Private Sub MSComm1_OnComm() Dim Buffer() As Byte Select Case MSComm1.CommEvent Case comEvReceive Buffer = MSComm1.Input Text2.Text = AscB(Buffer) 〜エラー処理〜 MSComm1.PortOpen = False -------------------------------------------- 受信するタイミングなのでしょうか？ それともコードが間違っているのでしょうか？