El problema son, efectivamente, las variables privadas.

Por eso es mejor añadirle al objeto un constructor de copia que se
encarge de eso:

Public Function Copia() as MiClase
Dim MiCopia as MiClase

Set MiCopia = New MiClase
...
'Copiar propiedades
...

Set Copia = MiCopia

End Function


Así podras crear una copia del objeto:

Dim MiObjeto2 as MiClase

Set MiObjeto2 = MiObjeto1.Copia()



---------------------------------------------------------------------
 Alberto Rodríguez Calvo (cittarc@usc.es)
 Centro de Innovación e Transferencia de Tecnoloxia (CITT)
 Universidade de Santiago de Compostela
 Páxina Web do CITT: http://www.usc.es/citt

 Avda. Ciencias s/n, Campus Sur Tfno (9)81 599800
 15706 Santiago de Compostela (A Coruña) (9)81 563100 Ext 14380
 España Fax (9)81 599309
---------------------------------------------------------------------


-----Mensaje original-----
De: lean1@usa.net <lean1@usa.net>
Para: vb-esp@ccc.uba.ar <vb-esp@ccc.uba.ar>
Fecha: miércoles 23 de diciembre de 1998 06:04 a.m.
Asunto: (VB-ESP) Copias de objetos


Quiero hacer una copia de una instancia de un objeto determinado a
otro, obviamente partiendo de la misma clase, sin tener que copiar los
atributos de a uno desde la instancia existente a la instancia inicializada, es decir copiar zonas de memoria, y que ellas queden apuntadas por diferentes
punteros.