掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ACTIVEX.EXEで独自イベントを発生させ、標準EXEでイベント処理するには？ (ID:124530)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
書込ありがとうございます。 ' 標準EXEプロジェクトのソース ' Formが１つ存在する ' ACTIVEX.EXEのプロジェクト(Prj)を参照設定している Public WithEvents Test As Prj.ClassTest Private Sub EvTest(Msg As String) Text1.Text = Msg End Sub Private Sub Form_Load() Set Test = New Prj.ClassTest End Sub ' ACTIVEX.EXEプロジェクトの記述 ' １つのFormと１つのClassが存在する(Class名：ClassTest) 'ClassTestの記述 Public Event EvTest(Msg As String) Private Sub Class_Initialize() Load Form1 End Sub Public Sub EvTestON() RaiseEvent EvTest("イベント発生！") End Sub 'Form1の記述 Public WithEvents Test As ClassTest '通信クラス定義 Private Sub Form_Load() Set Test = New ClassTest End Sub Private Sub Button1_Click() Test.EvTestON End Sub にて再現できるかと思います。よろしくお願いします。
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2020 Takeshi Okamoto All Rights Reserved.