具体是这样的，for_load事件在webbrowser中打开默认页，以后点击网页中按钮后在IE中打开，实现代码，谢谢！

Private Sub Form_Load()
WebBrowser1.Navigate "http://www.baidu.com/"
While WebBrowser1.ReadyState <> 4
 DoEvents
Wend
For Each a In WebBrowser1.Document.All.tags("a")
 a.Target = "_blank"
Next
End Sub