クリックイベントを送信しようとしているWebページに次のhtmlコードがあります。それはSELECTタグです。ただし、次のコードを使用して見つけることができません。
Dim element As HtmlElement = bbsmWB.Document.GetElementsByTagName("SELECT").Cast(Of HtmlElement).First(Function(el) el.GetAttribute("id") = "aPopUp")
element.GetElementsByTagName("OPTION").Cast(Of HtmlElement).First(Function(el) el.InnerText = "thunder").SetAttribute("selected", "selected")
探している Select タグがその Web ページの iframe 内にあることが原因のようです。
これを行うと、HTMLをうまく取得できます。
theHTML = bbsmWB.Document.Window.Frames("ifrm-rtw32").Document.Body.InnerHtml
theHTML内でaPopUpコードを見つけました。
HTML コードは次のようになります。
<SELECT style="WIDTH: 100%" id=aPopUp onclick=hideMe() size=20>
<OPTION value=sunny>Sunny</OPTION>
<OPTION selected value=rain>Rain showers</OPTION>
<OPTION value=thunder>Thunder Storms</OPTION>
<OPTION value=snow>Snow Showers</OPTION>
</SELECT>
上記の vb.net コードを変更して、デフォルト ページではなくiframeで表示されるようにするにはどうすればよいですか?