主题：判断webbrowser网页是否加载完整的通用函数，请大咖指导

1、

Dim web As New System.Windows.Forms.WebBrowser()
web.ScriptErrorsSuppressed = True
web.Navigate("http://www.webxml.com.cn/WebServices/WeatherWebService.asmx/getWeatherbyCityName?theCityName=59316")
 
Do Until web.ReadyState = 4
    Application.DoEvents
Loop

output.show(web.Document.Body.InnerText)

2、可以通过循环判断某一个元素是否出现来判断。