等待 Web 浏览器控件完全加载

本文关键字：加载 控件 Web 浏览器 等待 | 更新日期: 2023-09-27 18:36:28

我目前正在使用WinForm中的 webBrowser 控件 -

public Form1()
        {
            InitializeComponent();
            webBrowser1.AllowNavigation = true;
            webBrowser1.Navigate("http://foo.bar");        
        }

我有一个按钮控件，它获取webBrowser1.Url.OriginalString并将其设置为文本框 -

// On button_Click
string requestResponse = webBrowser1.Url.OriginalString;
requestURLtextBox.Text = requestResponse;

但是，如果在webBrowser1有足够的时间获取OriginalString文本之前单击该按钮，这将出错，因为该值尚不存在。

我尝试添加 -

while (webBrowser1.ReadyState != WebBrowserReadyState.Complete)
{
      Thread.Sleep(1000);  
}

然而，在 button_Click 事件中的前一个代码之前，这进入了一个无限循环。如何在网络浏览器完成后检索OriginalString？

等待 Web 浏览器控件完全加载

这里有一些可能适合你的VB简单代码：

    If mbBusy Then Exit Function ' form level variable
    mbBusy = True
    Web.Navigate("http://.....htm")
    dtWebWait = Now().AddSeconds(timeoutSeconds)
    Do Until Web.ReadyState = WebBrowserReadyState.Complete
        Application.DoEvents()
        If Now() > dtWebWait Then
            MsgBox("navigate timeout - search form")
            Exit Function
        End If
        Threading.Thread.Sleep(250)
    Loop
    mbBusy = False
相关文章：