Passing Objects...

[Dim A]

I have this type of class structure in my program:

Class1 - strings, longs, and doubles.

Class2 - collection of class1 and a few strings

Now I have a form that takes in or modifies values of type class1 by loading or taking the data in from yet another form, and adds them to a variable of type class2.

I'd like to pass a reference of class1, by using a class2 reference.

I thought it'd be something as simple as adding this property get to my class2...

Public property get class1(ByVal seqnum As Integer) As   class1type
       class1 = class2Obj.class1Col.Item(seqnum)
End Function

but this results in a dynamic variable/no with block declared error.

Obviously, this is getting a little complicated, but hopefully you can at least see what I'm trying to do and give me some advice.

Also, is there anything special I have to write into my class to allow set class=class statements to work?

Thanks.

[Stevie-O]

To ASSIGN an object variable, you have to use Set:

Public property get class1(ByVal seqnum As Integer) As class1type
Set class1 = class2Obj.class1Col.Item(seqnum)
End Function