tagCANDY CGI VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
VBレスキュー(花ちゃん) の Visual Basic 2010 用 掲示板(VB.NET 掲示板)
[ツリー表示へ]  [ワード検索]  [Home]

タイトル SerialPort1_DataReceivedが発生しません
投稿日: 2012/08/04(Sat) 17:34
投稿者et
お世話になります。
シリアルポートの受信について投稿させていただきます。
開発環境:VB2010pro Win7    

Form1_LoadでSerialPort1.Open()して、SerialPort1_DataReceivedのイベントを取得しようとしていますが、イベントが発生しません。
パソコン2台で送信側、受信側を作ってMU-2ソフトで送受信の確認はできました。
SerialPort1.Open()の設定で足りないこととか、受信方法の違いを教えて頂けないでしょうか。
宜しくお願いします。

    Private Sub Form1_Load(ByVal sender As System.Object, _
                           ByVal e As System.EventArgs) Handles MyBase.Load
        'シリアルポートをオープンする。
        Call SerialOpen()
    End Sub

    Private Sub SerialOpen()

        'シリアルポート
        SerialPort1.PortName = "COM3"
        'ボーレート
        SerialPort1.BaudRate = 19200
        'データビットをセットする. (データビット = 8ビット)
        SerialPort1.DataBits = 8
        'パリティビットをセットする. (パリティビット = なし)
        SerialPort1.Parity = Parity.None
        'ストップビットをセットする. (ストップビット = 1ビット)
        SerialPort1.StopBits = StopBits.One

        Try
            'シリアルポートをオープンする.
            SerialPort1.Open()
        Catch ex As Exception
            MsgBox(ex.Message)
        End Try

    End Sub
    'シリアルポートがデータ受信した時のイベント
    Private Sub SerialPort1_DataReceived(ByVal sender As System.Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort1.DataReceived
        Call DataRead()
    End Sub
    '
    Private Sub DataRead()
        Dim data As String = ""
        '受信する
        data = SerialPort1.ReadLine()

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

古いスレッドにレスはつけられません。