| 投稿日 | ： 2003/10/01(Wed) 15:31 |
| 投稿者 | ： くらす |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： WithEventsのコントロールが配列の場合について |
いつも参考にさせていただきありがとうございます。
WithEventsについて教えてください。
入力チェック用のクラスモジュールを作り、そこで
Form上に配置しているテキストボックスのイベントを
WithEventsで取得し、処理しています。
クラスにForm上のターゲットのテキストボックスを
設定する際、Form上のテキストボックスが配列の場合
はエラーとなってしまいます。
（ちゃんと添え字も指定して渡しているのですが。）
何か、よい方法はありますでしょうか？
●入力チェック用クラス
WithEvents txtT As TextBox
Public Sub SetTextBox(objText As TextBox)
Set txtT = objText '→objText が配列のコントロールだとerr
End Sub
●フォーム側
Set m_objTxt = New clsTxt
m_objTxt.SetTextBox(H_SHMCD(0))