Scusate avete ragione. Non ero davanti al pc. Comunque il codice è molto simile:

codice:
Private Sub Form1_Shown(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Shown 
wb.Navigate(New Uri("http://www.gigle.it"))  'Sito che non esiste
End Sub 
Private Sub wb_DocumentCompleted(ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles 
wb.DocumentCompleted 
MsgBox( wb.DocumentTitle) 
End Sub
Eseguendo il codice otterrai nella MessageBox il titolo della pagina web. Potresti usare quel titolo per determinare ciò che ti serve.

Per esempio:
codice:
 If (wb.DocumentTitle = "Internet Explorer: impossibile visualizzare la pagina Web") Then
              'Istruzioni
         End If