• ベストアンサー

シリアル通信について

VB6にてシリアル通信プログラムを作成しましたが、データが受信できません。 ハイパーターミナルなら受信できて、一度ハイパーターミナルを使用すると、作成したプログラムでもデータが受信できるようになります。（再起動するとまたハイパーターミナルを使用するまで受信できません） 自作プログラムでなにか処理がたりないのでしょうか？

質問者が選んだベストアンサー

  • ベストアンサー
  • nannano
  • ベストアンサー率27% (20/74)
回答No.1

ＶＢでどのような初期化手順を踏んでいらっしゃるか分かりませんが… 私が書くまでもなく分かりやすいページがありました。

参考URL：
http://www.winapi-database.com/Network/RS-232C/RS232C.html

その他の回答 (1)

回答No.2

ポートオープンはこんなかんじ MScomm1.RThreshold = 1 MScomm1.InputLen = 1 MScomm1.CommPort = 1 MScomm1.portOpen = True 受信イベントはこんなかんじ Private Sub MScomm1_OnComm() Select Case MScomm1.CommEvent Case 2 Inp$ = MScomm1.Input inpStr$ = inpStr$ + Inp$ End Select End Sub

  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. Visual Basic

関連するQ&A

  • シリアル通信におけるプログラム終了が遅い件

    今、Visual Basic6.0でシリアル通信を行うプログラムを作成しています。完成後に実行させると思い通りに端末からのデータを表示してくれるのですが、［切断］といったポートを閉じる操作をしたときにプログラムが終了するまでに30秒から40秒ほどかかってしまいます。ソースを書き直して再度実行するなど、終了するたびに毎回同じくらいの時間がかかります。Windowsのハイパーターミナルでもデータの受信・表示ができる上、［切断］ですぐに終了するのですが、自作のプログラムではそうはいきません。解決方法をよろしくお願いいたします。

  • シリアル通信のイベント受信について

    現在VB6.0を使用してシリアル通信のプログラムを MsCommを使用せず、CreateFileを使用して行っておりますが、 データの受信を受信したタイミングでテキストボックスに表示したいのですが どの様にすると受信したタイミングでデータを取得できるのかわからず困っております。

  • シリアル通信について

    現在、VB6.0を使用してシリアル通信のプログラムを作成しております。 その中で、通信先に対してバッチファイルを実行させてたいのですが、 通信先に対してバッチファイルを実行させる方法がわかりません。 どのようにするのか教えて頂けないでしょうか。 また、実行するバッチファイルでは引数を渡す必要があるようなのですが その方法も教えて下さい。 よろしくお願い致します。

  • シリアル通信について。

    PICからPCにデータ（電圧:最大値5)を受信させようとしています。 受信には C++を用いたプログラムを自作したいのですが、 どうしてもうまくいかなかったため投稿させていただきました。 症状としては、まずポートを開く事すら出来ていません。 RS232c {USBで変換) が接続されているポートはCOM1です。 ポートが開くか確かめるプログラムとしては、次のようなソースを使いました。 #include<windows.h> #include<iostream> using namespace std; int main(void){ HANDLE hCom; hCom = CreateFile( (LPCWSTR)"COM1", GENERIC_READ | GENERIC_WRITE, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL ); if (hCom == INVALID_HANDLE_VALUE) { cout<<"シリアルポートを開くことが出来ませんでした。\n"<<endl; return false; } CloseHandle( hCom )； return 0; } これを実行すると「シリアルポートを開くことが出来ませんでした。」としかなりません。 （ (LPCWSTR)"COM1"となっているのは、「'CreateFileW' : 1 番目の引数を 'const char [5]' から 'LPCWSTR' に変換できません。」 　と出てしまったためです。） ハイパーターミナルを用いてCOM1からデータを受信できていることは確認しましたので、 通信が出来ていないわけではないようなのです。 ありふれた質問である事は重々承知の上ですが、 このソースでシリアルポートが開けない理由を教えていただければ幸いです。 環境:Visual C++ 2008 Express Edition Microsoft Windows XP Version 2002 Service Pack 3

  • エクセルとシリアル通信

    ＰＩＣでシリアル通信利用して、ハイパーターミナルに温度を表示する装置を 作りました。これもしかして、直接エクセルに取り込めないんでしょうか。 そうすると、加工しやすくなるんですが。

  • VirtualBoxでのシリアル通信設定について

    VirtualBoxを使用したシリアル通信の設定方法について教えて下さい。 以下、やりたいこと及び、環境（設定）です。 【やりたいこと】 ホストOSとゲストOS間でシリアル通信を使用して、 データの送受信等をやりたいです。 【環境・設定】 ・VirtualBox　ver.4.0.10 ・ホストOS　WindowsXP　SP2 　　通信ポート設定 　　　　COM1　有効 　　　　IRQ　　　04 　　　　I/O範囲　03F8～03FF 　　使用ソフト　　ハイパーターミナル、SeriaDdebug ・ゲストOS　Fedora8 　　通信ポート設定（VirtualBoxの設定→シリアル） 　　　　ポート１ 　　　　シリアルを有効化にチェック 　　　　ポート番号　COM1（※COM2もやってみましたが、結果は変わりませんでした。） 　　　　IRQ　　　　　4 　　　　I/Oポート　0x3F8 　　　　ポートモード　ホストデバイス 　　　　ポート/ファイルパス　COM1 　　　　※ポート２は設定していません。 　　使用ソフト　minicom、自作アプリ ※上記条件でVirtualBoxのfedoraを立ち上げて、ホスト側でシリアル用ターミナルを 起動すると、ポートが開けません等のエラーログ（ポップアップ）が出ます。 設定方法、そもそものできる出来ない等のアドバイス、回答をお願い致します。 よろしくお願いします。

  • シリアル通信　VB　受信したデータ

    初めまして。 今現在，RS-232Cのシリアル通信で，重量計で測定したデータ(990kg)をCOM1に取り込めるようにするプログラムを作成中です。 出力データのフォーマットは以下のようになっています。 ST 　 , GS 　 , +0012345　　kg 　CRLR 　ヘッダ１ 　ヘッダ２　　　データ　　単位　　ターミネータ 18バイトのデータを受信していることになります。 ここで質問なのですが，プログラムでは１バイトずつイベントを発生させて１バイトずつ受信させているのですが，１バイト×１８回　のデータをどのようにつなぎ合わせれば18バイトのデータとして扱えるようになるのですか？ うまく説明できていないかも知れませんが，お分かりの方がいらっしゃいましたら宜しく御願いします。 VBではOnCommを使用しています。

  • シリアルポートから送られてくる文字の指定方法

    現在ＶＢ2010で作成中のアプリと測定器のデーターをシリアル通信で記録採取したと考えています。 測定機からの通信が下記の通りにＰＣに送られてきますが、必要な部分の採取す方法が分かりませんので教えてください。 ハイパーターミナルでの測定器からの文字受信は１2文字送られてきます。 ＶＢで作成中のアプリでは５文字目から９文字目のみをテキストに表示したいと思いますが、分かる方教えてください。現在制作中のソースも一部表示しますので、よろしくお願いします。今年から勉強してる、初心者です。 Delegate Sub AddDataDelegate(ByVal str As String) Private Sub AddData(ByVal str As String) '受信データー表示' If SerialPort1.IsOpen = False Then 'シリアルポートをオープンしていないときは、処理しない Return End If '受信データー読み込み Dim data As String data = SerialPort1.ReadExisting() 　　 上記のソースが受信するようにしていますが、受信データーは１ｓ毎に更新されておりますその都度テキストへ表示するようにしたいと思います。データーが更新されても、数値は残るようにしたいと思います。

  • ＵＳＢ通信について

    RS-232 を使ったシリアル通信の場合、ＷＩＮＤＯＷＳにハイパーターミナルが装備してあるので、 たとえばＰＩＣからデータを送ったりする場合簡単にできます ところでＵＳＢを使ってデータを送ったりする場合はどうやってやるんでしょうか。 ハイパーターミナルに相当するソフトとかあるんでしょうか、おしえてください。

  • シリアル通信のデータ欠けについて

    シリアル通信のデータ欠けについて教えてください。 WindowsXP上でシリアル通信「115200bps、8、None（ODD、EVEN）、1」の設定で、1ms毎に12バイトの送受信を行っているのですが、1分ほど受信すると、データ欠けが発生します。 受信プログラムはこの問題が発覚してから、受信したデータを変数にバッファリングし、保存ボタンを押してから、ログファイルへ保存するシンプルなプログラムを作成し、確認しています。 「切り分けた内容」 １、57600bpsでも発生する ２、VB6、VisualStudio2008　C#で作成したツール及びフリーソフト（SerialDebugger）でも、データ欠けが発生する ３、RS232Cラインモニタ（キャロちゃん）で確認すると、データ欠けは発生していないので、受信側の問題と判断しています。 ４、送信間隔を50msと遅くしても発生する ５、RS232C及び、USB変換したものどちらでも発生する ６、9600bpsでは、発生しない（同じデータ数での判断） ７、ケーブル長は1mほど ちなみに通信時間に余裕が無い為、チェックサムやハンドシェイクなどの機能は、入れられません。 一般的にWindowsでシリアルの高速受信を行うと、データ欠けが発生するのが当たり前なのでしょうか？

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する

あなたにピッタリな商品が見つかる！ OKWAVEセレクト

質問する