Blog con recursos para proyectos:
http://proyectosvb2008.blogspot.com

codigo para Web browser:
 Private Sub AxWindowsMediaPlayer1_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs)

    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged
        If ComboBox1.Text = "Google Busqueda" Then
            WebBrowser1.Navigate("http://www.google.com/search?hl=en&q=" + TextBox1.Text + "&btnG=Google+Search&meta=&aq=f&oq=")
        ElseIf ComboBox1.Text = "Google Imagenes" Then

            WebBrowser1.Navigate("http://images.google.com/images?hl=en&q=" + TextBox1.Text + "&btnG=Search+Images&gbv=2&aq=f&oq=")
        Else
            WebBrowser1.Navigate("http://maps.google.com/maps?hl=en&q=" + TextBox1.Text + "&btnG=Search+Maps&gbv=2&aq=f&oq=")
        End If
    End Sub

    Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

    End Sub

    Private Sub Button1_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        WebBrowser1.Navigate(TextBox1.Text)
    End Sub
End Class