VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 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というバイナリーデータを数値に変換することが先なのでしょうか・・?!


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -