collection问题
public class oFilter
property name ...
property value...
end class

dim a as new oFilter
dim b as collection

a.name= "a "
a.value= "1 "
b.add(a)

此时b有一个item, 其值是 "a ", "1 "

a.name= "b "
a.value= "2 "
当执行到这里时，发现b原有的item值有问题,变为 "b ", "2 "
b.add(a)
执行完后，b的有2个item，全部为 "b ", "2 "

这是怎么造成的，怎样才能让b的2个item分别为
"a ", "1 "
"b ", "2 "



[解决办法]
Dim a As New oFilter
Dim b As New Collection
a.name = "a "
a.value = "1 "
b.Add(a)
a = New oFilter '你少了这一步
a.name = "b "
a.value = "2 "
b.Add(a)