Browse DevX
Sign up for e-mail newsletters from DevX

Tip of the Day
Language: Visual Basic
Expertise: Intermediate
Jun 4, 2001



Building the Right Environment to Support AI, Machine Learning and Deep Learning

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() As IUnknown
   Set NewEnum = YourCollectionObject.[_NewEnum]
End Function

To hide the NewEnum function, and to give it the appropriate procedure ID, go to Tools/Procedure Attributes. Make sure NewEnum is selected in the Name box. Then click Advanced and check
Chris Gabriel
Comment and Contribute






(Maximum characters: 1200). You have 1200 characters left.



Thanks for your registration, follow us on our social networks to keep up-to-date