Question

vb WebBrowser1_DocumentComplete事件为什么都是执行两次呢

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)

msgbox("ss")

End Sub

我随便打开一个网页，为什么总是弹出两次ss的对话框呢

Answer 1

两次算少的了，因为浏览的页面可能有框架，每个单独的框架都可能会触发DocumentComplete事件。可以通过以下方式来处理：

Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
If (pDisp Is WebBrowser1.Object) Then MsgBox "网页下载完毕!"
End Sub

Answer 2

看看URL