ActiveX コントロールにユーザー定義型プロパティを追加したい。 (ID:102838)

名前

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

本文 早速の御回答有難う御座います。 Class1を別プロジェクト（ActiveX DLL）で作成し直し、 コンパイルしたDLLを、ActiveX コントロールのプロジェクト 及びそれを使用する標準EXEプロジェクトの参照に加えたら このエラーは無くなりました。 続いてですが、 Private Sub UserControl_ReadProperties(PropBag As PropertyBag) 'ここで実行時エラー '713'が発生！！ Set m_P1 = PropBag.ReadProperty("P1", New Class1) End Sub の部分でやはりエラーが発生します。 内容は、 「実行時エラー '13' 型が一致しません。」 です。トレースしてみた所、デフォルト値として渡している 第二引数の「New Class1」が、生成（Initialize）された直後に 破棄（Terminate）され、結果として「Nothing」がセットされて いるのが原因だと思われます。 この、デフォルト値を正しくセットする方法が分かりません。(T_T) ちなみに、この「New Class1」を第二引数に渡す事自体正しいですか？