[VB6] objecten van een klasse met volgnummer aanroepen

[mmy841]

Ik heb volgende klasse "clsDect" aangemaakt:

code:

Public toestel As String
Public nummer As String

Nu heb ik bv. 2 objecten waar ik gegevens aan kan toekennen

code:

dim obj1 as clsDect
dim obj2 as clsDect
set obj1 = new clsDect
set obj2 = new clsDect

obj1.toestel = 10
obj1.nummer = 10

obj2.toestel = 20
obj2.nummer = 20

Maar kan ik deze objecten ook oproepen op volgende manier?

code:

dim  i as integer
i = 1
obj & i.toestel = 100
obj & i.nummer = 100

Ik weet dat bovenstaand stukje code een foutmelding geeft. Maar is er een manier om het object via "i" aan te spreken. Ik heb nl. een lijst van bv 10 objecten. Daar moet ik het object zoeken waar het toestel = 50 bijvoorbeeld.

[Lustucru]

Je zou ze in een array of in een collectie kunnen stoppen?

[sopsop]

code:

dim oObj(10) as clsObject

Zou dat niet werken? gewoon een arraytje van je object maken, dan kun je 'm gewoon zo aanroepen:

code:

for i = 0 to uBound(oObj)
   set oObj(i) = new clsObject
   ....
next i

Etc...

[mmy841]

ja, zo kom ik er uit! Dat ik daar niet aan dacht.

Bedankt voor de reactie