用  Set MyNewW = New Form2
    Set ppDisp = MyNewW.WebBrowser1.Object
    MyNewW.Visible = True
同时打开了多个相同的有WebBrowser1窗体,指向不同的URL,当其中一个窗体的WebBrowser1 DocumentComplete发生时,其它的窗体就不发生了,如
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
 unload me
end 
就把所有打开的窗口都关闭了,我本意是让它只关闭自己的窗口。
如何WebBrowser1_DocumentComplete只管自己,不干涉其它窗口。

解决方案 »

  1.   

    用  Set MyNewW = New Form2
        Set ppDisp = MyNewW.WebBrowser1.Object
        MyNewW.Visible = True
    同时打开了多个相同的有WebBrowser1窗体,指向不同的URL,当其中一个窗体的WebBrowser1 DocumentComplete发生时,其它的窗体就不发生了,如
    Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
     unload me
    end 
    就把所有打开的窗口都关闭了,我本意是让它只关闭自己的窗口。
    如何WebBrowser1_DocumentComplete只管自己,不干涉其它窗口。
    建议你在Form2中只要控件,不要代码