使用WebBrowser1.Refresh刷新页面，怎么等待刷新完

使用WebBrowser1.Refresh刷新页面，如何等待刷新完？
意思是使用语句：WebBrowser1.Refresh   后，下面就相当于设置一个断点。当WebBrowser1的内容刷新完毕后，才能执行后面的语句。

WebBrowser1.Refresh()

'刷新完成后弹出OK

messagebox.show("OK")

------最佳解决方案--------------------
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
On Error Resume Next

If pDisp = WebBrowser1.object 
msgbox “完成”
End If
End Sub

这个是vb的应该通用你试试看
------其他解决方案--------------------
简单的，好多方法，举几个例子吧
refresh方法会触发其他事件，我现在用手机上的，看不到成员列表，记得是什么documentstateChanged 类似是这种的，有个Changed的 你可以在里面各种Happy
或者曲线救国啊，WebBrowser1.Navigator WebBrowser1.Url 然后各种happy
手机打字真是坑爹…
------其他解决方案--------------------

引用:

意思是使用语句：WebBrowser1.Refresh   后，下面就相当于设置一个断点。当WebBrowser1的内容刷新完毕后，才能执行后面的语句。

VB.NET code

WebBrowser1.Refresh()
'刷新完成后弹出OK
messagebox.show("OK")

刷新不触发WebBrowser1_DocumentComplete事件
------其他解决方案--------------------
求高手解答...
------其他解决方案--------------------
注册js 方法进去吧。比如：window.onload