Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Mostrar Formlario MDI

01/06/2005 - 20:05 por J o H n U s \(PE\) | Informe spam
Ayuda Hacer una pregunta
Hola amigos tengo una consulta sobre a la hora de mostrar un formulario MDI,
principal lo que tengo es que cuando inicio el sistema me muestra un
pantalla de seguridad donde el usuario ingresa sus datos y si es OK,
entonces me muestra el formulario principal el mdi, pero ahora k lo muestro
el otro formulario aparece y nose oculta cuando lo oculta se cierra la
aplicacion aqui tengo algo de mi codigo.
desde un sub main hago k carge el el de ingreso de seguridad..

desde el modulo ago k muestre el formulario de login
SuB Main()

Application.Run(New FrmUser)

end Sub

IF (validacion)
MessageBox.Show("Ingreso al Sistema .NET")

'Aqui implementar para lo demas del formulario.

Dim MiForm1 As New Form1 (MI MDI)

MiForm1.Show()

Dr.Close()

Me.Close() (mi formulario anterior,de login) aca se cierra la aplicacion..

ELSE

mas codigooo

END IF

alguna solucion.. porfavor no se que pueda ser
email Siga el debateRespuesta 5 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 J. Carlos Herrrero
01/06/2005 - 20:45 | Informe spam
Hola:
Prueba esto:

Module Inicio
Public Sub Main()
Dim lofrmInicial As New frmInicial
lofrmInicial.ShowDialog() 'Form para el login
Dim Resultado As DialogResult
Resultado = lofrmInicial.DialogResult
If Resultado = DialogResult.OK Then
Dim loPrincipal As New frmPrincipal
Application.Run(loPrincipal) 'Form MDI
End If
End Sub
End Module

Espero que te sirva
Un saludo desde Bilbo:
Carlos

"J o H n U s (PE)" escribió en el mensaje
news:
Hola amigos tengo una consulta sobre a la hora de mostrar un formulario
MDI,
principal lo que tengo es que cuando inicio el sistema me muestra un
pantalla de seguridad donde el usuario ingresa sus datos y si es OK,
entonces me muestra el formulario principal el mdi, pero ahora k lo
muestro
el otro formulario aparece y nose oculta cuando lo oculta se cierra la
aplicacion aqui tengo algo de mi codigo.
desde un sub main hago k carge el el de ingreso de seguridad..

desde el modulo ago k muestre el formulario de login
SuB Main()

Application.Run(New FrmUser)

end Sub

IF (validacion)
MessageBox.Show("Ingreso al Sistema .NET")

'Aqui implementar para lo demas del formulario.

Dim MiForm1 As New Form1 (MI MDI)

MiForm1.Show()

Dr.Close()

Me.Close() (mi formulario anterior,de login) aca se cierra la aplicacion..

ELSE

mas codigooo

END IF

alguna solucion.. porfavor no se que pueda ser


Preguntas similares

 

Busqueda sugerida :