Visual Basic .NET

イベントメッセージルーチンは次の書式になります。


WndProcを使用する方法

Visual Basic.NET(以下、VB.NETと呼びます) の機能としてイベントメッセージルーチンを使用する方法です。
WndProcを使用する場合、アプリケーションに関する全てのイベントが発生するたびにイベントメッセージルーチンが呼ばれます。

イベントメッセージルーチンの作成

VB.NETでWndProcを用いる場合、コードの自動生成機能がありませんので、イベントメッセージルーチンに関わる部分は手動で記述してください。
以下の手順で関数を作成してください。

  1. 関数の宣言
    System.Windows.Forms 名前空間のクラス内の構造体Messageを用いると、システムからアプリケーションやコントロールに送られるメッセージに関する情報を取得できます。

    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)

  2. 処理の記述

    例:"デバイス動作終了イベント発生"と出力する場合

    If m.Msg = AIOM_AIE_END Then
        Text_ErrorString.Text = "デバイス動作終了イベント発生"
    End If

  3. ベースクラスのWndProc処理
    WndProc関数を使用した後はこの処理を行います。

    MyBase.WndProc(m)

  4. 1~3を合わせると、イベントメッセージルーチンは以下のような形になります。

    Protected Overrides Sub WndProc(ByRef m As System.Windows.Forms.Message)
        If m.Msg = AIOM_AIE_END Then
            Text_ErrorString.Text = "デバイス動作終了イベント発生"
        End If
        MyBase.WndProc(m)
    End Sub

ウィンドウハンドルの指定

イベントを使用するためには、アプリケーションのウィンドウハンドルをデバイスドライバに設定する必要があります。
イベントの設定には以下の関数を使用します。

アナログ入力

AioSetAiEvent

アナログ出力

AioSetAoEvent

カウンタ

AioSetCntEvent

タイマ

AioSetTmEvent

これらのイベント設定関数で、パラメータhWndにウィンドウハンドルを指定します。
Visual Basic.NETでは.NET Frameworkクラスライブラリクラス内のメンバ変数Handleが ウィンドウハンドルを所持していますので、このメンバ変数をそのまま指定してください。

Ret = AioSetAiEvent ( Id , Handle , AiEvent)

Ret = AioSetAoEvent ( Id , Handle , AoEvent )

Ret = AioSetCntEvent ( Id , CntChannel , Handle , CntEvent )

Ret = AioSetTmEvent ( Id , TimerId , Handle , TmEvent )