Newで立ち上げたWebBrowserのイベントをキャッチするには？ (ID:85978)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 Window FormでInternet Exploreに対しての操作をするプログラムを作っています。 Form1をロード時に、 ------------------------------------------------ Dim WebBrowser1 As SHDocVw.InternetExplorer WebBrowser1 = New SHDocVw.InternetExplorer WebBrowser1.Visible = True ------------------------------------------------ としてブラウザを立ち上げているのですが、フォームデザイナに実物がないため、WindowClosingといったイベントを指定する方法がわかりません。 ------------------------------------------------ Private Sub WebBrowser1_WindowClosing(ByVal sender As Object, ByVal e As AxSHDocVw.DWebBrowserEvents2_WindowClosingEvent) Handles WebBrowser1.WindowClosing If MsgBox(""閉じていいですか？", MsgBoxStyle.Question + MsgBoxStyle.YesNo + MsgBoxStyle.DefaultButton1) = MsgBoxResult.Yes Then End If End Sub ------------------------------------------------ としたところ、 「HANDLES句には、WithEvents変数が必要です」というエラーが出ました。 どなたかわかる方がいらっしゃいましたら、お助け願います。