WEBBrowserのモーダル表示について (ID:86754)

名前

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

本文 お世話になります。 WebBrowserコンポーネントを利用した独自ブラウザを作ってます。 新しいウィンドウを開くときに、モーダル表示したいのですが、うまくできません。何か良いアドバイスいただけますか？ Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean) Set objFrm = New Form1 Set ppDisp = objFrm.WebBrowser1.Object objFrm.Show vbModal End Sub 上記のコードの場合、objFrm.Showでさらに別ウィンドウが表示されてしまいます。