从网站价值中收集数据

Question

我收到了一些代码，但它无效。我正在尝试从我的网站上制作我的ListBox1显示数据。值为“boxL”但我的代码不起作用。有什么帮助吗？

Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click

    Dim allelements As HtmlElementCollection = WebBrowser1.Document.All
    For Each webpageelement As HtmlElement In allelements

        WebBrowser1.Document.GetElementById("boxL") = ListBox1.Text

        If webpageelement.GetAttribute("value") = "Submit" Then

            webpageelement.InvokeMember("click")
        End If
    Next
End Sub

版本：VB2013