CallByName

[Licantropo28]

Hola, buenos dias. En una aplicacion que estoy desarrollando desde el menu puedo abrir varios formularios y los abro seleccionado nodos de un arbol. El caso es que ahora mismo lo tengo asi:

Código:

Select Case NombrePantalla:
    Case "Formulario1": Formulario1.Show()
    Case "Formulario2": Formulario2.Show()
    .
    .
    .
End Select

Me gustaria poder ahorrarme todo el select usando CallByName, realizar lo sieguiente en lugar de eso.

Código:

CallByName(NombrePantalla, "Show", CallType.Method, Nothing)

El problema esta en que nombre de pantalla es un string con el nombre de la pantalla. Hay alguna forma de que CallByName sepa interpretar que el string que le paso como parametro hace referencia a un objeto.

Los formularios que utilizo son las instancias que crea la aplicacion, se puede acceder a ellas por My.Forms.Formulario1, My.Fomrs.Formulario2... Pero claro, tengo el mismo problema, no puedo obtenerlas directamente a traves del nombre.

¿A alguien se le ocurre como podria hacerlo?

Muchas Gracias, Un saludo.

[jorgesl]

Código:

Dim asmObjeto as Assembly
Dim objObjeto as Object

asmObjeto = Assembly.LoadFrom(NombrePantalla)
objObjeto = asmObjeto.CreateInstance(assemblyName.Namespace)

CallByName(objObjeto , "Show", CallType.Method, Nothing)

Tal vez algo parecido te puede funcionar