VB 6如何使自定义集合类支持每个
我已被置于一个项目,其客户端前端是用VB 6编写的,确认!我正在尝试开发一个支持For ... Each语法的自定义集合类.在VB 6中这可能吗？或者我坚持使用带有计数器的For..Next来识别索引.
谢谢您的帮助!
Jus*_*gey 19
关键部分是将其添加到自定义集合类中......
Public Function NewEnum() As IUnknown
Set NewEnum = m_Employees.[_NewEnum]
End Function
并在过程属性中,将过程id设置为-4,如下所示:
参考:http://www.vb-helper.com/howto_custom_collection_with_for_each.html
- 因为`colldispid.h`中有`#define DISPID_NEWENUM(-4)`以及`#define DISPID_LISTITEM 0`和`#define DISPID_LISTCOUNT(-531)`但是VB的`For Each`运算符不使用它们. (3认同)
| 归档时间： |
|
| 查看次数： |
5802 次 |
| 最近记录： |