登陆窗体在验证用户名和密码后就会被隐藏了然后就显示主窗体，但是主窗体关闭的时候。登陆窗体还是在运行着，怎样才可以使主窗体关闭和登陆窗体同时关闭呢？

你可以这样:如果登陆成功  登陆窗体就关了...只显示主窗体...这样就可以了....

show主窗體的時候

主窗體.owner=登入窗體

登入窗體.hide()




關閉的時候 主窗體.owner.close

多谢楼上的朋友帮手啊！
但是我用了上边的办法后就出现另外一个问题啦！！
就是如果用主窗体上边的叉叉来关闭主窗体，那登陆窗体还是运行着的啊！！
有什么办法可以解决啊？

在退出主窗体的时候，close的函数里把登陆窗体nothing一下就可以了。

closing事件裡面

主窗體.owner.close

直接把进程杀了最省事

Public Sub killsprocess1()
Dim sProcesses() As System.Diagnostics.Process
Dim sprocess As System.Diagnostics.Process
sProcesses = System.Diagnostics.Process.GetProcesses
For Each sprocess In sProcesses
If sprocess.ProcessName = "你的工程名称" Then
sprocess.Kill()
End If
Next
End Sub

用模块的Sub Main()执行入口，然后每个窗体都用ShowDialog()方法显示就行了。

If CurrOperator.Login() Then'如果登录成功
Dim frmMain = New frmMain()
frmMain.show()'显示主窗体
Me.Finalize()
End If

'Finalize说明：允许 Object 在“垃圾回收”回收 Object 之前尝试释放资源并执行其他清理操作