vb.net使用WebBrowser浏览器控件自制浏览器的相关技术

vb6.0到.net很多机制都不同了，一些东西的确折腾了半天。

案例：登录验证打开新网页（研究53客服登录框）

1）。一个窗体加载一个登录页面，登录验证后打开一个新窗体，同时窗体可以最小化到托盘。
2）。首先加载新窗体后，原第一个窗体要关闭。在.net中忘掉unload me吧. 使用me.close(),me.hide()
3）。做过项目的 或者动手做个的人 都知道出现了一个可怕的问题，就是登录框如果关闭则新窗体也跟着关闭，如果隐藏，登录窗体则占在内存中。 
4）。最小化到托盘的图标，在.net中很容易实现只需要加个NotifyIcon控件即可，然后在ICON中加入ICO图标。
如果在6.0中想实现，我们的思路可以用resize的事件去捕捉。即监视WindowState状态。
5）。如果新打开的页面用JS打开的，在window.open中的href地址我们却又很难捕捉到。如果是直接连接地址可能很容易捕捉到

Public   Class login Class login
    Private Sub NotifyIcon1_Click()Sub NotifyIcon1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles NotifyIcon1.Click
        Me.ShowInTaskbar = True
        Me.Show()
        Me.WindowState = FormWindowState.Normal
    End Sub

    Private Sub login_Load()Sub login_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        WebBrowser1.Navigate("http://www.53kf.com/login.html")
    End Sub

    Private Sub WebBrowser1_NewWindow()Sub WebBrowser1_NewWindow(ByVal sender As Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WebBrowser1.NewWindow
        NotifyIcon1.Visible = Nothing
        Me.Hide()
        Dim urlNew As String = sender.Document.ActiveElement.GetAttribute("href") '这个是关键
        Dim newForm As New setting()
        e.Cancel = True
        newForm.Show()
        newForm.settingHTML.Navigate(urlNew)
    End Sub
End Class