掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
シリアルで転送されたデータを読み取るには? (ID:100210)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
はじめまして。アカツキです。 vb6で、シリアル(RS-232C)から伝送されたデータを処理するのPGを作っています。 しかし、利用しているパソンコンはRS-232Cのポートがないため、RS-232CからUSBシリアル変換アダプター(USB-RSAQ5)を利用することになりました。 データを取れるかどうかを確認するため、以下のPGを作りました。 Private Sub Form_Load() MSComm1.CommPort = 4 'RS-232Cポート番号 MSComm1.Settings = "19200,E,8,1" MSComm1.InputLen = 0 MSComm1.InputMode = comInputModeText MSComm1.InBufferCount = 0 End Sub Private Sub Command2_Click() If MSComm1.PortOpen = False Then MSComm1.PortOpen = True End If If MSComm1.InBufferCount > 10 Then Instring = MSComm1.Input List1.AddItem Instring End If End Sub 実行したら、いつも 実行時エラー:8020 通信デバイスの読み取り時にエラーが発生しました。 のエラーメッセージが表示しました。 debugすると、 Instring = MSComm1.Input のとき、エラーが発生 MSComm1.Settings = "19200,E,8,1"の値がいろいろ変わって テストしましたが、エラーが解決できませんでした。 どなたかいいアイディアがあれば、教えていただくようにお願いします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.