自己作成クラスにて別のクラスを保持するには？

あると 2004-07-29 05:00:52 No: 115144

VB6.0にてクラスモジュールを二つ定義し、
片方にもう片方のクラスを持たせるメソッドを持たせたのですが、
それを実行すると
実行時エラー438
このオブジェクトはこのメソッドまたはプロパティをサポートしていません。

となってしまいました。

Class1, Class2

Class1にメソッド
Public Sub setWepon1(ByRef cls2 As Class2)

Set

End Sub
スペルミスなどではないことは確認したのですが、なぜ、このメッセージが出るのかがわかりません。

どなたか心当たりがありましたら教えたいただけないでしょうか。