Ver Mensaje Individual
  #2 (permalink)  
Antiguo 15/12/2008, 17:51
Exori
 
Fecha de Ingreso: diciembre-2008
Mensajes: 6
Antigüedad: 15 años, 5 meses
Puntos: 0
Respuesta: ¿Cómo cerrar una ventana al acceder a otra?

Hola, como andás otra vez XD.

Yo la ventana de log in siempre la hago como un formulario de dialogo.
Entonces deberías:

Crear un nuevo Window Form, "Dialog".
Agregarle dos textbox.
Vas a ver que los botones de OK y Cancel ya vienen O.o
entonces.... create una clase "INICIO" y ponle el siguiente codigo:

Class Inicio
Sub Main()
Dim iuLogIn as new IULogIn
if iuLogIn.showdialog() = DialogResult.OK then
Dim iuMenuPrincipal as new IUMenuPrincipal
iuMenuPrincipal.show
End if
End Sub



Luego... en la clase IULogIn.... pones lo siguiente.....

Class IULogin

Private Sub btnCancel_Click(ByVal sender As Object, ByVal e _
As System.EventArgs) Handles btnCancel.Click
DialogResult = DialogResult.Cancel
End Sub

Private Sub btnOK_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnOK.Click
If txtNombreUS.Text.Length = 0 Then
MessageBox.Show("Debe ingresar algo...")
txtUserName.Focus()
ElseIf validarPassword(txtUserName.Text, _
txtPassword.Text) Then
'En caso de que la pass o el nombre usuario sean invalidos....
MsgBox("Usuario o Pass inválida", _
MsgBoxStyle.Exclamation)
txtUserName.Focus()
Else
'Retorna OK
DialogResult = DialogResult.OK
End If
End Sub


End Class