求助：没有连接网页成功就从网页获取数据结果出错！！怎么办？？

Question

我用vb6编写一个小程序，使用WebBrowser控件从某个网页上获取数据，结果每次都在没有访问完成时，就进行获取数据的命令，结果出错！
访问网页和获取数据之间使用什么办法才能保证访问完成后才获取数据，请大家帮帮忙！！谢谢！！
代码如下：
WebBrowser1.Navigate "http://www.sohu.com/"      '访问网页
Web1 = WebBrowserPaiJia.Document.body.innerText  '获取数据出错提示
实时错误 '91';
对象变量或with块变量未设置

Answer 1

  WebBrowser1.Navigate "http://www.sohu.com/"
  Do While WebBrowser1.Busy
      DoEvents
  Loop
  Web1  = WebBrowser1.Document.body.outerhtml