cerrar form

En el vb2005 hay una opcion en las propiedades del proyecto que dice:
Shutdown mode: When last form closes

Lo mejor es que te crees un método Sub Main desde el que iniciar la
aplicación, desde ese método cargas el form de validación, y si la clave es
correcta, cargas el formulario principal,. algo así:
(este código lo puedes poner en el form principal o en cualquier formulario,
pero lo recomendado es en el form principal)

Public Shared Sub Main()
Dim fAcceso As New FormAcceso
If fAcceso.ShowDialog() = System.Windows.Forms.Ok Then
Application.Run(New FormPrincipal)
End If
End Sub

En el form de acceso puedes tener algo como esto:

Private Sub btnAceptar_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnAceptar.Click
If txtClave.Text = "123456" Then
Me.DialogResult = DialogResult.OK
Else
Me.DialogResult = DialogResult.No
End If
Hide()
End Sub

Private Sub btnCancelar_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnCancelar.Click
Me.DialogResult = DialogResult.Cancel
Hide()
End Sub

En las propiedades del proyecto debes indicar que el objeto de inicio sea
Sub Main

Nos vemos.
Guillermo
Microsoft VB MVP desde 1997
Mentor Asociado de Solid Quality Learning Iberoamericana

Te recuerdo que puedes entrar en mi sitio desde:
http://www.elguille.info/ y http://www.mundoprogramacion.com/
Los foros en: http://foros.elguille.info/
Si buscas un buen plan de alojamiento:
http://www.elguille.info/hostings/o...guille.htm

"Jose" escribió en el mensaje
news:

Estimados tengo como formulario principal mi formulario de acceso que
luego de verificar el usuario carga el formulario de menu principal. Como
hago para cerrar el formulario de acceso porque si lo hago se cierra toda
la aplicación.
Debo crear en mi module1 como inicio del programa?
Como se hace esto.
Gracias

"Jose" escribió en el mensaje
news:

Estimados tengo como formulario principal mi formulario de acceso que
luego de verificar el usuario carga el formulario de menu principal. Como
hago para cerrar el formulario de acceso porque si lo hago se cierra toda
la aplicación.
Debo crear en mi module1 como inicio del programa?
Como se hace esto.
Gracias

Hola:

Una manera simple es esta:

Public elUsuario As Usuario

Public Sub Main()
Dim f as New formaLogin
elUsuario = formaLogin.GetUser()
formaLogin.Dispose()
If Not elUsuario Is Nothing Then
Application.Run New frmPrincipal
End If
End Sub

GetUser es ua funcion implementada en formaLogin que te devuelve una
referencia al usuario que se ha identificado. Una vez que lo tienes, y si es
valido (no Nothing) entonces abres tu forma principal.

Salud!