自己学做一个简单的浏览器，输入网址能打开网页，只是点击里面的内容，弹出来的不是自己做的浏览器，而是IE7。要怎样才能实现点击以后能弹出自己做的浏览器来，请高手指点。本人刚开始接触VB不久。多谢。

还是不太明白，我做的浏览器很简单，不知道怎样才能设置为默认浏览器，请指点一二。

我找到一段代码：vb制作浏览器怎样不弹出ie窗口?
   
Dim strURL As String  
Private Sub WebBrowser1_NewWindow2(ppDisp As Object, Cancel As Boolean)  
Cancel = True  
WebBrowser1.Navigate strURL  
End Sub  
Private Sub WebBrowser1_StatusTextChange(ByVal Text As String)  
strURL = Text  
End Sub  
 
Private Sub Command1_Click()  
WebBrowser1.Navigate "www.  
End Sub  
可是在这里提示变量未定义：
 
Private Sub WebBrowser1_StatusTextChange(ByVal Text As String)
strURL = Text
End Sub
我也不知道是怎么回事，喜欢知道的朋友给看看。