Tabs GeckoFx 45在单击链接后获取新选项卡/弹出窗口的HTML（_blank）

一段时间以来，我在GeckoFX上的工作相当成功。 但是现在我在获取一个站点的HTML时遇到了一个问题，该站点是通过单击带有target=“\u blank”属性的链接打开的

PromptFactory.PromptServiceCreator = Function() New MyPromptService()
Xpcom.ProfileDirectory = "C:\gecko-cache"
Xpcom.Initialize("Firefox")
Dim form3 As New Form
Browser = New GeckoWebBrowser() 
Browser.Visible = True
form3.Controls.Add(Browser)
Browser.navigate("http://www.asd.com")
browser_wait_javascript(5)
Browser.Document.GetElementsByTagName("a").(0).Click()
browser_wait_javascript(5)

现在，浏览器将在新窗口中打开此链接的内容。 如何获取HTML代码，请在新窗口中单击链接？ 我喜欢这样的东西：

dim new_browser_window = get_window(last_opened_window)
dim html = new_browser_window.document.getelementsbytagname("body").(0).outerHTML

实现这一目标的最佳方式是什么

多谢各位

 Public Sub browser_wait_javascript(ByVal maxTimeout As Integer)
    Dim maxTimeouttime As DateTime = DateTime.Now.AddSeconds(maxTimeout)
    While DateTime.Now < maxTimeouttime
        System.Threading.Thread.Sleep(0)
        System.Windows.Forms.Application.DoEvents()
        System.Threading.Thread.Sleep(100)
    End While
    While Browser.IsBusy()
        System.Threading.Thread.Sleep(0)
        System.Windows.Forms.Application.DoEvents()
        System.Threading.Thread.Sleep(100)
    End While
End Sub

Public子浏览器\u wait\u javascript（ByVal maxTimeout为整数）
Dim maxTimeouttime As DateTime=DateTime.Now.AddSeconds（maxTimeout）
而DateTime.Now