困扰多年的集合类枚举的问题

Question

我们知道，集合类凭借一个属性过程来实现for each 枚举
Public Property Get NewEnum() As IUnknown
    '本属性允许用 For...Each 语法枚举该集合。
    Set NewEnum = mCol.[_NewEnum]
End Property我是用vb6+sp5,用类生成器工具生成的集合类acol,该集合类是一个普通类a的集合
但是我在程序中经常出现错误:
for each a in acol   提示：对象不支持该属性或方法
只能是：
for i=1 to acol.count
    set a=acol.item(i)
这样子不出问题。
关键是同样用类生成器工具生成的集合类，有的集合类有这个问题，有的集合类没有，我快疯掉了。请高手指教哪里出了问题？

Answer 1

这主要看你的a,acol如何定义的最好有详细代码
**********************************
*本人主要使用VB+MS SQL,C#略知一二
*                                
*如有相关问题需要帮助            
*                                
*可发短消息告知链接              
**********************************

Answer 2

就是普通的定义
比如：
dim obja as a
dim objCol as new aColobjcol.init '初始化for each obja in objcol  '这句就出错现在我修改的办法就是把acol类删除，在用类生成器重新生成一个基于a的集合类，
然后把原来类中的代码拷贝过来，就好了。只是我不明白为什么会这样子。