‘特定のリンクをクリック (URLがわかっている時。)
Dim e as HemlElement
For Each e In WebBrowser1.Document.GetElementsByTagName(“a”)
IF e.GetAttribute(“href”) = URL then
e.InvokeMember(“Click”)
Exit For
End If
Next
‘特定のリンクをクリック(Aタグに挟まれている文字列がわかっているとき。)
For Each e In WebBrowser1.Document.GetElementsByTagName(“a”)
IF e.innerText = 文字列 then
e.InvokeMember(“Click”)
Exit For
End If
Next
‘特定のリンクをクリック（Aタグに挟まれているHTMLに含まれている文字列がわかっているとき。)
For Each e In WebBrowser1.Document.GetElementsByTagName(“a”)
IF InStr(1,e.GetAttribute(“href”), 文字列) then
e.InvokeMember(“Click”)
Exit For
End If
Next
