MDIForm y Form
Publicado por Antonio Belando (93 intervenciones) el 23/02/2009 09:30:56
Estoy iniciando mi primera aplicación en la que he creado una MDIForm y una Form.
La propiedad “Enable” de la MDIForm la pongo en “False”, para que no se pueda hacer nada hasta que se introduzca en la Form la contraseña correcta.
En el Load de la MDIForm llamo a la Form (F_Contraseña) para que aparezca delante de la MDIForm:
Private Sub MDIForm_Load()
Call ConexionODBC
F_Contraseña.Show vbModeless, Me
End Sub
En el Load de la Form pongo que el foco lo tome el TexBox para introducir la contraseña:
Private Sub Form_Load()
Me.Show
T_Contraseña.SetFocus
End Sub
El problema está en que no se activa el TexBox de la contraseña hasta que no se pincha con el ratón en cualquier parte de los dos formularios, ya que por defecto está activo el MDIForm.
Para solucionar esto, ¿se podría mediante código poner alguna instrucción para que el ratón haga un clic?
Saludos cordiales,
Antonio Belando
La propiedad “Enable” de la MDIForm la pongo en “False”, para que no se pueda hacer nada hasta que se introduzca en la Form la contraseña correcta.
En el Load de la MDIForm llamo a la Form (F_Contraseña) para que aparezca delante de la MDIForm:
Private Sub MDIForm_Load()
Call ConexionODBC
F_Contraseña.Show vbModeless, Me
End Sub
En el Load de la Form pongo que el foco lo tome el TexBox para introducir la contraseña:
Private Sub Form_Load()
Me.Show
T_Contraseña.SetFocus
End Sub
El problema está en que no se activa el TexBox de la contraseña hasta que no se pincha con el ratón en cualquier parte de los dos formularios, ya que por defecto está activo el MDIForm.
Para solucionar esto, ¿se podría mediante código poner alguna instrucción para que el ratón haga un clic?
Saludos cordiales,
Antonio Belando
Valora esta pregunta
0