Почему такой сложный ответ, ребята? Абатищев, мне было бы интересно заглянуть в ваш мозг, должно быть интересно ...
Просто попробуйте это:
Private Sub WB1_NewWindow(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles WB1.NewWindow
newUrl = WB1.Url.ToString
e.Cancel = True
WB1.Navigate(newUrl)
End Sub
Теперь вы можете изменить вторую строку на WB2 или любой другой компонент WebBrowser в любой из ваших СОБСТВЕННЫХ форм.