引用:http://zhidao.baidu.com/question/133403436.html
WebBrowser1.Navigate "http://www.baidu.com"
Do
DoEvents
If WebBrowser1.ReadyState = 4 Then MsgBox "载入完成": Exit Do
Loop
引用:http://zhidao.baidu.com/question/133403436.html
WebBrowser1.Navigate "http://www.baidu.com"
Do
DoEvents
If WebBrowser1.ReadyState = 4 Then MsgBox "载入完成": Exit Do
Loop
转载于:https://www.cnblogs.com/sode/archive/2011/11/11/2245759.html