kunguito
04-16-2008, 04:11 AM
Hi,
I have created my own collection class. In order to be able to iterate through the objects of the class (FOR...EACH NEXT), i need the following procedure:
Public Property Get NewEnum() As IUnknown
Set NewEnum = m_Col.[_NewEnum]
End Property
Besides I have to HIDE the NewEnum method and assign it the ProcedureID of -4.
Apparently this is done through the Procedure Attributes dialog box from the tools menu. It's my guess that since I am using VBA and not VB6 this dialog box is not available. Can someone confirm that?
I've gathered some hints of a solution, but I don't know where to place it.
Attribute NewEnum.VB_UserMemId = -4
Attribute NewEnum.VB_MemberFlags = "40"
Any help??
I have created my own collection class. In order to be able to iterate through the objects of the class (FOR...EACH NEXT), i need the following procedure:
Public Property Get NewEnum() As IUnknown
Set NewEnum = m_Col.[_NewEnum]
End Property
Besides I have to HIDE the NewEnum method and assign it the ProcedureID of -4.
Apparently this is done through the Procedure Attributes dialog box from the tools menu. It's my guess that since I am using VBA and not VB6 this dialog box is not available. Can someone confirm that?
I've gathered some hints of a solution, but I don't know where to place it.
Attribute NewEnum.VB_UserMemId = -4
Attribute NewEnum.VB_MemberFlags = "40"
Any help??