投稿日 | : 2005/10/25(Tue) 00:24 |
投稿者 | : はせ |
Eメール | : |
URL | : |
タイトル | : Collectionで悩んでます |
VB6.0 + Win2000です
Collectionを使いこなせなくて悩んでます。
クラス内で宣言されているCollectionにオブジェクトを追加すると
Collection内の全てのオブジェクトが書き換えられてしまいます。
こんな感じです。
Item1、Item2、Item3、一覧はクラスです。
Item1.Name="あああ"
Item2.Name="いいい"
Item3.Name="ううう"
Call 一覧.Add Item1
Call 一覧.Add Item2
Call 一覧.Add Item3
------一覧クラス内
Private ItemList as Collection
Friend Sub Add(Item as clsItem)
ItemList.Add Item
end sub
Item1を追加した時は ItemList.Item(1).Name は ”あああ” なのですが
Item2を追加した時は ItemList.Item(1).Name も Item(2) も ”いいい”になってしまう
Item3を追加した時は ItemList.Item(1).Name も Item(2) も Item(3)も
全部 Name=”ううう”になってしまうのです。
どこがいけなかったでしょうか?
レコードとか配列を使えば解決しそうなのですが
Collectionをやっつけれるように、ご教授お願いします。