- 55 名前：デフォルトの名無しさん [2007/05/30(水) 16:22:12 ]
- Type T
code As Integer
End Type
Sub abc()
Dim a As T, c As New Collection
c.Add Item:=a
End Sub
↑のコードを実行するとc.Addの行で
「コンパイルエラー：パブリックオブジェクトモジュールで定義されたユーザー定義型に限り、
変数を割り当てることができ、実行時バインディングの関数に渡すことができます。」
というエラーになってしまう。
いろいろ調べてみたところCollection側からTの型情報を取得できない？のがエラーの
原因でTを構造体ではなくてクラスにしてObjectとして渡せばOKというのはわかったんですが
構造体が必要なたびにいちいちクラスモジュールを追加するのは正直面倒くさいです
Collectionに構造体を素直にAddできる何かうまい方法ってないんでしょうか？
