如何确定WebBrowser中的HTML是否正确显示?

Question

这个比较复杂，原因是一些大的站点都会对404错误进行处理，输出自定义的页面。
看看下面的代码：
首先在工程中假如一个Internet Transfer Control。然后，添加一个控件和
一个CommandButton到Form1，执行如下代码：
Private Sub Command1_Click()
    Text1.Text = Inet1.OpenURL("http://www.AppleVB.com/Nopage.htm", 0)
End Sub
将上面("http://www.AppleVB.com/Nopage.htm"转换为不同站点的不存在的URL
例如("http://www.Microsoft.com/Nopage.htm"，可以看到不同的站点对于404
错误的输出页面是不同的。
http://www.applevb.com

Answer 1

这个可是我吃饭的家伙,说不得,说不得...