投稿者 YuO  (社会人) 投稿日時 2012/6/7 12:17:49
参照型であるならば,Addするオブジェクトはそれぞれ別々にNewされたものでなければなりません。

例えば,
Class Foo
    Public Value As Integer
End Class
に対して,
Dim items As New List(Of Foo)
Dim f As New Foo
f.Value = 1
items.Add(f)
f.Value = 2
items.Add(f)
ではなく,
Dim items As New List(Of Foo)
Dim f As Foo
f = New Foo()
f.Value = 1
items.Add(f)
f = New Foo()
f.Value = 2
items.Add(f)
のように,それぞれNewする必要があります。