两次算少的了,因为浏览的页面可能有框架,每个单独的框架都可能会触发DocumentComplete事件。可以通过以下方式来处理:Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)If (pDisp Is WebBrowser1.Object) Then MsgBox "网页下载完毕!"End Sub
看看URL