De referencias

A ver esto es un poco complejo de explicar:

Tengo un control desarrolado por mi (MiControl) que
imprime el nombre de un tipo de componente (MiComponente)
seteado en una de sus propiedades.

Lo estoy haciendo de la siguiente manera, en el codigo de
MiControl agregue una referencia a MiComponente, y una
propiedad de tipo MiComponente

Property Componente as MiComponente
Set(Value as MiComponente)
nValue = Value
End set
End Property

Luego digo

para imprimir el nombre:

msgBox(nValue.Name)

Luego creo un Proyecto donde tengo agrego una referencia a
MiControl y otra a MiComponente, asi que MiComponente esta
referenciado en el proyecto y ademas dentro de cada
control MiControl

Lo que quiero es eliminar la referencia a MiComponente
dentro de MiControl, y de alguna forma imprimir el nombre,
sin tener que hacer un recorrido entre todos los
componentes del contenedor

For each Componente in xxxx.Container
if Component.GetType.ToString = "MiComponente" then
msgbbox(Componente.Name)
end if
Next

Eso no me sirve, tengo 200 controles MiControl en el form
por lo que eso se ejecutaria 200*200 veces, busco algo
directo, como el primer metodo pero sin usar la referencia.

Gracias in advance y disculpen lo extenso

AJPB