InputManについて


tmiyu  2003-08-01 18:48:36  No: 107957  IP: [192.*.*.*]

InputManのコントロールをWithEventsにて監視するクラスを作成してます。
私のマシンにてコンパイルしたDLLを、別の人が
使用すると、WithEvents宣言しているオブジェクトにセットする際、
  に「型が一致しません。」エラーがでます。
なぜでしょう?

わかられる方教えてください。よろしくお願い致します。

ロジックを記述しておきます。
Private WithEvents mnumControl as imber6Ctl.imNumber

Public Sub Init(byval objCtrl as Object)

 If TypeName(objCtrl)="imNumber" Then
    Set mnumControl = objCtrl
    ~~~~~~~~~~~~~~~~~~~~~~~~~
     ↑ここでエラー。
 end if

End Sub

編集 削除
ry  2003-08-26 15:06:51  No: 107958  IP: [192.*.*.*]

原因は判りませんが、とりあえず

If TypeName(objCtrl)="imNumber" Then

ではなくて、

If TypeOf objCtrl Is imber6Ctl.imNumber Then

とすると、良いかもしれません。

編集 削除