怎么使一个自定义集合类可用在for each...next

按照参考书上说的，需要定义如下一个函数
Public Function NewEnum() As IUnknown
Set NewEnum = p_Employees.[_NewEnum]
End Function
并且将该函数隐藏，设置其过程标志符设为－4
在这过程中我碰到了以下两个问题
1。As后面并没有自动出现IUnknown类，是不是因为我没有将其
对象库加入
2。tools-->procedure attribute中只有一个Help context ID
而且不能设置为负数，那怎么设置过程标志符呢？
另外，我是直接用类模块进行设计的，如果采用class builder中
的new collection则为自动完成上述操作，但是除了这个方法就
没有别的办法了吗？