日韩欧美国产精品免费一二-日韩欧美国产精品亚洲二区-日韩欧美国产精品专区-日韩欧美国产另-日韩欧美国产免费看-日韩欧美国产免费看清风阁

 

 

假定你的窗體叫Form1

Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)
Set nform = New Form1
Set ppDisp = nform.WebBrowser1.Object
nform.Show
End Sub

該文章在 2013/11/14 14:30:14 編輯過