DOBON.NET DOBON.NETプログラミング掲示板過去ログ

VB.netでタブ型ブラウザを作成しています

環境/言語:[WindowsXP,VB.Net FrameworkのVer1.03705]
分類:[.NET]

いまVB.NET2003でタブ型ブラウザを作成しているのですが、
マウスがリンク上にポイントされた時にリンク先のURLをTextBoxなどに取得したいと思うのですがどう取得すればよいかわかりません。
ぜひ取得方法を教えてください。

現在以下のようなコードで動的にAxWebBrowserを配置しています。

Private currentTabPage As System.Windows.Forms.TabPage
Private currentWebBrowser As AxSHDocVw.AxWebBrowser
'***************タブ作成***************
Sub tab(ByVal temp_URL As String)
Try
  Me.SuspendLayout()
  Dim tabPage As New System.Windows.Forms.TabPage
  Dim axWebBrowser As New AxSHDocVw.AxWebBrowser

  axWebBrowser.BeginInit()
  axWebBrowser.Dock = DockStyle.Fill
  AddHandler axWebBrowser.NavigateComplete2, New              AxSHDocVw.DWebBrowserEvents2_NavigateComplete2EventHandler(AddressOf   Me.AxWebBrowser_NavigateComplete2)
tabPage.Controls.Add(axWebBrowser)
axWebBrowser.EndInit()

Me.TabControl1.Controls.Add(tabPage)

Me.TabControl1.SelectedTab = tabPage
Me.currentTabPage = tabPage
Me.currentWebBrowser = axWebBrowser

Me.currentWebBrowser.Navigate2(temp_URL)

Me.ResumeLayout(False)

  Catch
End Try
End Sub
2005/11/29(Tue) 21:52:55 編集(投稿者)

お世話になります。

■No13955に返信(syuさんの記事)
StatusTextChange イベントを拾ったら
引数の e.Text で URL がわかりそうな感じですね。

http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/webbrowser/reference/events/statustextchange.asp
速答ありがとうございます。

返信で
> StatusTextChange イベントを拾ったら
とありましたがVB.NET初心者で調べては見ましたがイベントの拾い方がわかりません。

ぜひイベントの拾い方を教えてください。
悪戦苦闘しましたが何とか解決する事ができました。

ありがとうございました。
解決済み!

DOBON.NET | プログラミング道 | プログラミング掲示板