Visual Basic Foro
Programación => Visual Basic 6 => Mensaje iniciado por: ssccaann43 en Marzo 17, 2010, 02:10:11 pm
-
Bien explico un poco...
Tengo una lista de Formularios que he cargado en un List... Ahora bien, creo una function donde requiero el formulario, ejem:
Public Fuction Ejecutar (Formulario as Form)
....
....
....
....
End Function
El detalle es que no puedo llamar por ejemplo la function de esta manera...
Ejecutar List1.Text
Ya que me causa un error porque es un string lo que lee y no el formulario como tal... Quisiera saber si existe alguna manera de hacer eso???
-
Comparto con ustedes la respuesta de Seba...! ::)
Private Sub Command1_Click()
Dim vForm As Form
Set vForm = Forms.Add("form2")
vForm.Show
End Sub
con CallByName:
Private Sub Command1_Click()
Dim vNombreForm As String
Dim vForm As Form
vNombreForm = "Form2"
Set vForm = CallByName(Forms, "Add", VbMethod, vNombreForm)
vForm.Show
End Sub
Funka Excelente...!