IE_NewWindow2がトラップしない (ID:92358)

名前

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

本文 皆さん助けてください。開発中どういうわけかトラップしていた NewWindow2イベントがとらなくなりました。以下のような現象が 出てます。分かる方おられませんでしょうか。 ・下記コードでOnQuitはとるがNewWindow2スルー ・WebBrowser(コンポーネント参照に変えて)だとNewWindow2とる Option Explicit Dim WithEvents IE1 As InternetExplorer Private Sub Form_Load() Set IE1 = CreateObject("InternetExplorer.Application") IE1.Navigate "http://www.yahoo.co.jp/" IE1.Visible = True End Sub Private Sub IE1_NewWindow2(ppDisp As Object, Cancel As Boolean) MsgBox "" End Sub Private Sub IE1_OnQuit() MsgBox "" End Sub