【コントロール配列のイベントを受け取る方法】宜しくお願いします。 (ID:116083)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 下記のようにしてコントロール配列のイベントを受け取りたいのですが、 うまくいきません。 ※コントロール配列にすると 「オブジェクトまたはクラスがこのイベントをサポートしていません」 とエラーになります。 ※WithEventsでむりでしょうか？ 他に方法はないのでしょうか？ ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ コントロール配列のイベント処理を共通で処理したいのですが・・・。 ご教授ください。 ※※※※※※※※※※※※※※※※※※※※※※※※※※※※※ 【フォームの処理】 Private clsTest As Class1 Private Sub Form_Load() Set clsTest = New Class1 ’ここでエラーになります。 Text1としてもダメでした。 Set clsTest.txt_Text = Text1.Item(0) End Sub 【クラスの処理】 Public WithEvents txt_Text As TextBox Private Sub txt_Text_GotFocus() MsgBox "txt_Text_GotFocus" End Sub