ABCdatos

Estoy definiendo una dll la cual tiene una clase en la cual tengo un arreglo, y quiero que ese arreglo se pueda ver para poder llenarlo cuando lo este utilizando.

Ya intente con la propiedad set pero al asignarle valores en un arreglo cuando hago el llamado me envia el error Type Mismatch porque no corresponde.

EN LA DLL
Definicion del arreglo:
private Arr() as Variant

Definicion de la propiedad para pasar los datos:
public property Let Asigna(byref Valor as Variant)
set Arr = Valor
end property

'EN EL LLAMADO
Dim Arr() as Variant
Dim Obj as Object

Redim Preserve Arr(3)
Let Arr(0) = "HOLA"
Let Arr(1)= "COMO ESTAS"
Set Obj = CreateObject("Dll.Prueba")
Obj.Asigna = Arr



Como le podria hacer ???

Muchas gracias por su ayuda.