Public Class Form1

    Private ReadOnly form2 As New Form

    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        WebBrowser1.ScriptErrorsSuppressed = True
        WebBrowser1.Navigate("https://foro.elhacker.net/")

    End Sub


    Private Sub WebBrowser1_NewWindow(sender As Object, e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow

        form2.Show()
        Me.Hide()

    End Sub

End Class