我需要在Geckofx 33浏览器中处理完整的文档壁虎忙,功能不起作用StatusText也
<i>
web.navigate("http://google.com")
msgbox(web.isbusy) ' this return False '
</i>
如果'web'是您的geckowebbrowser,则只需执行:
web.DocumentCompleted += web_DocumentCompleted;
void web_DocumentCompleted(object sender, GeckoDocumentCompletedEventArgs e)
{
//do stuff here
}
也,而不是检查'isbusy',尝试有一个类似的事件处理程序'web. navigate '。
IsBusy
是True
,而不是立即使用Navigate
。在我的代码中,我等了一段时间(1秒),然后创建循环:
Private Sub wait(ByVal interval As Integer)
Dim sw As New Stopwatch
sw.Start()
Do While sw.ElapsedMilliseconds < interval * 1000
Application.DoEvents()
If IBW.CancellationPending = True Then Exit Do
Loop
sw.Stop()
End Sub
Web.Navigate("http://google.com")
'Now wait for 1 second before checking IsBusy
wait(1) : Do While IWeb.IsBusy = True : Application.DoEvents() : Loop