如何确定是完页 WebBrowser 控件中加载

WebBrowser 控件引发当 ReadyState 属性被更改为 READYSTATE_COMPLETE DocumentComplete 事件。 这指示 WebBrowser 控件已完成下载网页。 下面是一些关于此事件要点：

•	一切完成后万一有了无框架, 页 DocumentComplete 后触发。
•	万一有多个帧, DocumentComplete 获取激发多次。 并非所有框架激发此事件, 但各个框架引发 DownloadBegin 事件触发 DocumentComplete 事件对应。
•	DocumentComplete 事件有 IDispatch * 参数, 是 IDispatch 的帧 (shdocvw) 用于触发 DocumentComplete。
•	顶级框架触发 DocumentComplete 以结束。 因此, 检查如果页完成下载, 需要检查是否与 WebBrowser 控件的 IDispatch IDispatch * 参数。 对于 VisualBasic, 下面是执行此检查代码： Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant) If (pDisp Is WebBrowser1.Object) Then Debug.Print "Web document is finished downloading" End If End Sub