Vector de Objetos

angel
25 de Noviembre del 2005
Hola,
Mi problema es el siguiente:

tengo declaradas dos clases en mi proyecto y quiero que en la clase 1 haya un vector de objetos de la clase 2. ¿cómo debo de hacerlo?

muchas gracias por vuestra colaboración.

Saludos

mvallejos
25 de Noviembre del 2005
' Declarar un vector dinámico en la sección General
Dim Vector() as Clase2

' En la inicialización de la clase, le das dimension iniclal al vector
Redim Vector(0)

Después, para ir creando instancias en el vector

Dim Cls2 as Clase2
Set Cls2 = New Clase2
<setear las propiedades de la nueva instancia>
' Agregarlo al vector
Redim Preserve Vector(Ubound(Vector)+1)
Set Vector(Ubound(Vector)) = Cls2

Saludos

PD : Investiga un poco las colecciones, es otra opcion