Form in Vb.net

[xegallo]

   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
      Dim frm As New Form2()
      frm.ShowDialog()
      Me.Close()
   End Sub