Asunto: VISUAL BASIC: ¿CÓMO CIERRO UN FORM A TRAVES DE UNA VAR?
Buenos días,
Antes de comenzar, gracias por leerme.
He probado mil y un maneras para hacer lo siguiente, pero siempre me da errores y no lo consigo.
Tengo un formulario que contiene un subformulario (Form_menu) que es un menú con un desplegable. Este desplegable no es más que una lista de los nombres de los formularios que hay en el programa. Mi intención es que al hacer click sobre uno de ellos, se abra ese formulario y se cierre el actual.
He conseguido hacer que se abra, simplemente tratando los casos del desplegable por su nombre y llamando a una función load que abre dicho formulario.
en el código de Form_menu, abrir el formulario que quiero SÍ me funciona:
Select Case me.dspl_formularios
Case "Formulario A"
load_form_alta_consulta_cursos
Pero lo que NO CONSIGO es poner a VISIBLE = FALSE el formulario en el que está metido el subformulario menú, para que se cierre el actual y se abra el nuevo al que el usuario ha hecho click.
Para comunicarlos entre ellos, he creado en este menú un campo invisible "estoy_en_form" que toma el nombre del formulario que lo abre (lo asigno en cada función load de cada formulario)
he probado con: Form_menu.estoy_en_form = "Form B" y con Form_menu.estoy_en_form= FormB
Entonces, al cerrarlo, [ESTO NO FUNCIONA]
Select Case me.dspl_formularios
Case "Formulario A"
Dim miFormulario As Form
Set miFormulario = Forms(me.estoy_en_form)
miFormulario.Visible = False
load_form_alta_consulta_cursos
He probado mil formas más y nada. Con CallByName, cogiendo los controles, declarando un Set frm as Object, AS form... y nada T_T
Puede publicar nuevos temas en este foro No puede responder a temas en este foro No puede editar sus mensajes en este foro No puede borrar sus mensajes en este foro No puede votar en encuestas en este foro
Visita nuestro nuevo sitio web con programas y contenidos actualizados: Proyecto A