Llamado de un form con un String
Pasarle a una función un string con el nombre de una forma y ejecutarla

Fecha: 26/Ene/2005 (21/01/2005)

Autor: José Bravo jose13599@yahoo.es 

 

 


Que tal amigos, he querido automatizar la creación de menús y de llamados a formas, con una funsión estandar, con parámetros obtenidos del a base de datos. La creación del menú es muy sencilla. Pero cuando llegué a la ejecución del a forma con el nombre del a forma guardada en la base de datos, me tranqué. Creo que este código es importante ya que me cansé de buscar en la red y no conseguí nada. En la ayuda de VB, me decía únicamente la propiedad Count, del a colección forms. Se que es sencillo Guille, pero al principio me costó y en la red no lo conseguí. Disculpen si ya lo tenían.

Deben crear un proyecto y agregar un formulario (“Form2”, ya que cuando crean un proyecto, agrega un Form (“Form1”) automáticamente.

En el Form1, debe agregar un Botón (Command1) y ejecutar el programa. Al hacer clic en el botón se ejecutará el Form2.

A continuación sigue código en Visual Basic:

Private Sub Command1_Click()
Dim NombreForma As String
Dim Forma As Form
          ‘Pasamos el nombre del formulario a la variable tipo string
    NombreForma = "Form2"
‘Pasamos el objecto a la varable forma
Set Forma = Forms.Add(NombreForma)
de aquí en adelante es igual.
      Forma.Show 1
End Sub
 

Aunque es muy sencillo, espero les sirva de algo.

 


ir al índice