オブジェクトを引数で渡す

みー  2003-05-21 16:10:18  No: 107220  IP: [192.*.*.*]

こんにちは。
オブジェクトを引数で渡したいのです。

クラスモジュールで、
 public sub AAA(objButton As Object,objLabel As Object)
と引数にコマンドボタンとラベルのオブジェクトを受け取りたいのですが、

この「AAA」を呼ぶフォームモジュールで、
画面にcmdButtonというコマンドボタンと、
lblMessageというラベルが置かれている画面に、
 Call AAA(cmdButton,lblMessage)
と書いたのですが、オブジェクト自信が引数に渡されません。
どうコーディングすればオブジェクトが渡せるのでしょうか・・。
初歩的な質問のような気がしますが、よろしくお願いします。

編集 削除
nanashi  2003-05-21 16:46:58  No: 107221  IP: [192.*.*.*]

テストしてみましたが、そのやり方で普通に渡せます。

> Call AAA(cmdButton,lblMessage)
まさかとは思いますがこのまんまの記述じゃないですよね？

クラスモジュールなので

    Call Class1.AAA(cmdButton,lblMessage)

というような記述になります。
「Class1」の部分は実際にクラスモジュールのインスタンスを作成した時のオブジェクト名になります。

編集 削除
みー  2003-05-21 17:06:33  No: 107222  IP: [192.*.*.*]

すみません、クラスモジュールじゃなくて、標準モジュールでした・・。

フォームモジュールで"AAA"をCALLするところでブレイクをかけて、cmdButtonのところにカーソルを当ててみると、「False」が表示され、lblMessageのところにカーソルを当てるとlblMessageのCaptionの内容が表示されます。
これはオブジェクトを渡してる感じではないですよね・・。

編集 削除
イトウ  2003-05-21 17:48:20  No: 107223  IP: [192.*.*.*]

途中の発言ですみませんが、

なんらかのエラーが発生するのでしょうか？
Object型はVB6の場合は、オブジェクト全般を定義するものですので
クイックヒントの内容は未定義のはずです。

ちなみに、VBA for excel だと何の以上もなくできましたけれど…

編集 削除
nanashi  2003-05-21 18:24:32  No: 107224  IP: [192.*.*.*]

標準モジュールでも何も問題無く動きます。

実際にオブジェクトが渡されているかどうか試した上での発言でしょうか？
そのプロシージャ内でCaptionプロパティなどを変えてみてください。

編集 削除