Closing Form**Resolved**

[VBGangsta]

Hi, I have it so a form loads from the sub main and after the user presses a button i want it to load a another form and close the current on. I can load it fine but i tried everything and cant close the current form. I dont want to hide it either. Thanks

And is there a way to disable that JIT debugger from coming up?

[wey97]

You could do this:

Public Sub main()
 
        Dim frm1 As New Form1
        Dim frm2 As New Form2
 
        frm1.ShowDialog()
 
        frm2.ShowDialog()
 
    End Sub

and on the Form1 button click call Me.Close()

[VBGangsta]

i tried to Me.Close() after the second form was loaded and it didnt work.

[wey97]

make sure the Startup Object is set to Sub Main...

and you have to make your Sub Main is just like mine and call ShowDialog() not just Show() or it won't work.

[VBGangsta]

On submain...

Module mMain
 
    Public Sub Main()
                    If frmRegister.IsRegistered Then
                Dim frm As New Form4
                frm.ShowDialog()
                ''(what i had)'Application.Run(New Form4)
            End If
                    Application.Exit()
        End If
    End Sub
 
End Module

On form4

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
                Me.Close()
        Dim frm As New Form1
        frm.ShowDialog()
    End Sub

I still have the same problem, am i doing something wrong?

[Rally2000]

I have that exact same problem and also cant get it to work.

[Edneeis]

Try this:

Module mMain
 
    Public Sub Main()
           If frmRegister.IsRegistered Then
                Dim frm As New Form4
                frm.ShowDialog()
                Dim frm1 As New Form1
                frm1.ShowDialog()
            End If
                    'Application.Exit() not needed
    End Sub
 
End Module

[wey97]

The second form shows when the first form is closed too.

I think he only wants the second form to show if the button is clicked.

[VBGangsta]

Yeah, i want form1 to open only after a button on form4 is pressed.

[wey97]

Module mMain
 
Public Sub Main()
 
    If frmRegister.IsRegistered Then
 
        Dim frm As New Form4
 
        frm.ShowDialog()
 
    End If
 
End Sub

On form4

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 
    Dim frm As New Form1
 
    Me.Hide()
    Me.Close()
    frm.ShowDialog()
 
End Sub

[VBGangsta]

Excellent!!!! Thank you Much