VB.net 如何在WebBrowser中插入新的内容

在Body中追加  代码：

    Private Sub cmdAddPic_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdAddPic.Click
        Dim el As HtmlElement = web.Document.CreateElement("div")
        el.InnerHtml = "test"
        el.Id = "id1"
        web.Document.Body.AppendChild(el)
        el = Nothing
    End Sub

在指定的标签里追加 代码

    Private Sub cmdAddPic_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdAddPic.Click
        el = web.Document.CreateElement("div")
        el.InnerHtml = "test2"
        el.Id = "id2"
        web.Document.GetElementById("id1").AppendChild(el)
        el = Nothing
    End Sub

其实就是先通过GetElementById找到标签，然后再追加到进去