如何点击WebBrowser1中相同链接的第1个？
如何点击WebBrowser1中相同链接的第1个？
On Error Resume Next
Set vTag = WebBrowser1.Document.getElementsByTagName("a")
vCount = vTag.Length
For i = 0 To vCount - 1
If vTag(i).innerText = "淘宝网" Then
WebBrowser1.Document.All.Tags("a")(i).Click
End If
Next
当网页中有多个相同关键词链接时，用这个方法点击的是网页所有关键词“淘宝网”都点击，但我想只点击网页中的第1个关键词“淘宝网”如何实现呢？谢谢。
[解决办法]
If vTag(i).innerText = "淘宝网" Then
WebBrowser1.Document.All.Tags("a")(i).Click
exit for
End If
