VB Web 浏览器控件下拉列表

Question

在此网页上：https://www.youtube.com/upload_defaults 我想控制下拉类别。

当我检查元素时，我没有找到 ID，所以我不能使用 GetElementById。

我试过这段代码，但它不起作用：

Dim allelements As HtmlElementCollection = WebBrowser1.Document.All

For Each webpageelement As HtmlElement In allelements

    If webpageelement.GetAttribute("value") = "category_id" Then
        webpageelement.SetAttribute("value", "20")

    End If

提前致谢。

Answer 1

检查元素后，您是对的，类别下拉列表没有 ID，但有一个名称：category_id。您检查当前循环的 HtmlElement 是否为类别下拉列表的条件是错误的。替换此行：

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

有了这个：

If webpageelement.GetAttribute("name") = "category_id" Then

或者这样：

If InStr(webpageelement.Name, "category_id") Then

因为，请不要忘记，category_id 是下拉菜单的名称。

VB Web 浏览器控件下拉列表

VB WebBrowser control dropdownlist

html

vb.net

element