IEをFullScreenで表示して、PopupMenuで制御 (ID:80939)

名前

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

本文 魔界の仮面弁士さん。ありがとうございました。 教えていただいた形で実現しました。しかし、ポップアップメニューの使い方 がわからず、MessageBoxで確認メッセージを出力してIEを操作 する事にしてしまいました。 しかし、マウスのイベントをTrackPopupMenuで送ったら、どこで取得 するんでしょう？以前、このプロジェクトとは別に Formクラスの親クラスイベントWinProcメソッドを使ったら アプリが立ち上がらなくなった事があったもので.. ' InternetExplorerのイベント Friend WithEvents IE As New SHDocVw.InternetExplorer ' IEで読み込んだドキュメントからのイベント Friend WithEvents DocEvent As mshtml.HTMLDocumentEvents_Event Private Sub IE_DocumentComplete(ByVal pDisp As Object, ByRef url As Object) Handles IE.DocumentComplete ' ドキュメントを渡す DocEvent = IE.Document End Sub Private Function DocEvent_ondbclick() As Boolean Handles DocEvent.ondblclick Dim ret As DialogResult ret = MessageBox.Show() If ret = DialogResult.OK Then ' IEを閉じる End If End Function