WebBrowser タブの追加
投稿者 魔界の仮面弁士  (社会人)
投稿日時
2012/3/21 15:05:28
NewWindow2 イベントを処理する必要があります。
http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=10230
http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=10726
http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=2568
http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=10230
http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=10726
http://rucio.cloudapp.net/ThreadDetail.aspx?ThreadId=2568
これをWebBrowserで表示したいのです。
TabControlを使って新しいTabを作りそこに表示するのではないかと思うのですが
切り替わるURLの取得はどうすればいいのかとか
よろしくお願いします
Dim AL As HtmlElementCollection
Dim FM As HtmlElementCollection
Me.txtURL.Text = WebBrowser1.Url.ToString
If Me.txtURL.Text = "***********" Then
AL = Me.WebBrowser1.Document.All
FM = AL.GetElementsByName("******")
FM(0).InnerText = "********"
FM = AL.GetElementsByName("******")
FM(0).InnerText = "******"
FM = AL.GetElementsByName("******")
FM(0).InvokeMember("******")
End If