比较对象的值（在线给分）
某个自建类JDoms，继承了CollectionBase,相当于JDom的集合
某个自建类JDom，下有属性若干，如code,name等
dim a1,a2 as new JDoms
想判断a1,a2的值是否相等，用Equals始终返回false
我逐一比较,
for i=0 to a1.count-1
if a1.item(i).code <> a2.item(i).code then return true
if a1.item(i).name <> a2.item(i).name then return true
next
这样做，发现2对象值都是相等。
有什么方法，可以直接比较2个对象，而不需要这样的循环
谢谢
[解决办法]
呵呵，你用实例名称直接比较，是比较两个实例的地址，他们当然不会相等
你自己写一个比较函数吧，把两个实例传进去，在函数中对其元素逐一比较
