新しいクラスを作成し、イベントを使用できるアプリケーション オブジェクトを宣言するには(VBA/ActiveX)

イベントが実行されたときに通知を受け取るために、WithEvents キーワードを使用して、特定のオブジェクト タイプの変数を宣言することができます。

1. VBA IDE でクラス モジュールを挿入します。[挿入]メニューから[クラス モジュール]を選択します。
2. プロジェクト エクスプローラ ウィンドウで新しいクラス モジュールを選択します。
3. プロパティ ウィンドウでクラスの名前を EventClassModule に変更します。
4. [F7] を使用するか、[表示]メニュー [コード]を選択してクラスのコード ウィンドウを開きます。
5. クラスのコード ウィンドウに次の行を追加します。

   Public WithEvents App As AcadApplication

   新しいオブジェクトがイベントを使用できるように宣言されると、それがクラス モジュールの[オブジェクト]ドロップダウン リスト ボックスに表示され、クラス モジュールの新しいオブジェクトに対してイベント プロシージャが記述できるようになります([オブジェクト]ボックスで新しいオブジェクトを選択すると、そのオブジェクトに有効なイベントが[プロシージャ]ドロップダウン リスト ボックスに一覧表示されます)。