dcsimg
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


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

WEBINAR:

On-Demand

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
 
Thanks for your registration, follow us on our social networks to keep up-to-date