Make Collections Work Like Standard VB Collections – For Each…Next
To activate For Each…Next iteration in your VB collections, place the following procedure in your collection object: ‘ NewEnum must return the IUnknown interface of a’ collection’s enumerator.Public Function NewEnum()