WebBrowser1.Navigate "d:\txtOperation.html"
on error goto err
err:
doevents
c = WebBrowser1.Document.Body.outerhtml
ってな感じにしてみました、問題ないみたいですがいかがでしょうか