Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
WebBrowser2.Width = Form1.Width
WebBrowser2.Height = Form1.Height
Set ppDisp = WebBrowser2.Objec
End Sub
一点弹出网页，就报错 对象不支持属性