close and open application, restart

Private Sub btn_restart_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_restart.Click
        Application.Restart()
        Environment.Exit(0)
    End Sub

fuente