怎么中止窗口继续加载

如何中止窗口继续加载
如何在主窗口的Load事件里，添加以下代码：
Private Sub Main_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim FormLogin as Form2 = new Form2()
FormLogin.ShowDialog()
....
End Sub

其中:FormLogin为登陆窗口

请问：如果登陆密码不正确，应添加什么代码中止主窗体（Main.frm）加载，直接退出程序。
[解决办法]
Application.[End]
[解决办法]
楼上正解，另外可以将login窗体设为启动窗体，失败了直接退出即可
[解决办法]
        Try
            '显示登陆窗口
            startfrm = New frmLogin
            Me.Hide()
            startfrm.ShowWnd()
            Do
                System.Windows.Forms.Application.DoEvents()
‘循环等待如果返回的密码错误可退出
            Loop Until startfrm.mSelectChanged <> 0
            If startfrm.mSelectChanged = -1 Then
                mnExit_Click(sender, e)
                Exit Sub
            End If
             Me.Show()
        Catch ex As Exception

        End Try