タイトル : Re: Activexで呼び先のコレクションへデータをセットする方法 投稿日 : 2010/03/17(Wed) 19:33 投稿者 : ぶー
Prog1側 colには別のクラスの構造体にセットしたデータがコレクションの形で格納されています。 Set Obj = CreateObject("Prog2.class1") with Obj .Sendatas = new collection set .Sendatas = col .Read end with prog2側 class1のプロパティは Instancing=MultiUse Persistable =NotPersistable class1.cls public Sendatas as collection Public Sub Read if Sendatas.count > 0 then ・・・・0になっています。 end public > 代入処理を 2 回行っているのはなぜでしょうか? こうすればセットするのかなと思いまして・・(いろいろ試行錯誤してまして) Prog2でProg1で格納したコレクションデータを使いたいだけなので (Prog1でコレクションに格納したデータは取得するのが結構大変で時間がかかるので また、Prog2で同じことをしなくてもいいように流用できないかなあと) Prog2でProg1と同じデータを読めれば入れ替えでも差し替えでもいいのですが。 |