我试图使用一个循环而且我已经冻结但没有完全崩溃。
Dim theElementCollection As HtmlElementCollection
theElementCollection = WebBrowser1.Document.GetElementsByTagName("DIV")
For Each curElement As HtmlElement In theElementCollection
Dim controlName As String = curElement.GetAttribute("name").ToString
curElement.InvokeMember("click")
Next
在我的情况下,应该只有一个div类名,我只想调用它。
编辑改进的格式
答案 0 :(得分:0)
我找到了一个像这样的解决方法
For Each h As HtmlElement In WebBrowser1.Document.GetElementsByTagName("input")
If Not Object.ReferenceEquals(h.GetAttribute("className"), Nothing) AndAlso h.GetAttribute("className").Equals("numeroCustomer") Then
h.InnerText = loginid
Exit For
End If
Next
希望这可以帮助任何有类似问题的人。