投稿日 | : 2005/07/19(Tue) 17:22 |
投稿者 | : チロル |
Eメール | : |
URL | : |
タイトル | : Re^2: MSCommバイナリーデータ受信処理 |
GODさんアドバイス有難うございます。
私にはまだGODさんのアドバイスを受け取るだけの技量がないみたいなので私なりの解釈をします。
間違っているでしょうが、どうか訂正お願いします。
' データを一括で受信できるようにする
MSComm1.InputLen = 0
' データを一括で受信できるようにする
MSComm1.InBufferCount = 0
' 1バイト受信毎にOnCommイベント発生
MSComm1.RThreshold = 1
' 送信バッファ空でOnCommイベント発生
'MSComm1.SThreshold = 1
' バイナリーで取得するようにする
MSComm1.InputMode = comInputModeBinary
と認識しています。
Private Sub cmdOutPutPol_Click() を Private Sub MSComm1_OnComm()にし
MSComm1.SThreshold = 1をコメントアウトしました。
If Len("Buffer") = 6 Then
>条件が常にTrueになりますが・・・
申し訳ございません。理解することができません。
>If Mid(Buffer, 1, 1) <> COMM_CODE.DLE Then MsgBox "DLE 1 NG"
>文字列と数値を比較するようになってますね。
>そもそもBufferって文字列じゃない見たいですが。
まずBufferというバイナリーデータを数値に変換することが先なのでしょうか・・?!