Una vez que la pagina este cargada utiliza este código para obtener el código de fuente:
Código:
Dim variable as String
variable = WebBrowser1.Document.documentElement.outerhtml
Una vez que tengas el código de fuente guardado en la variable, utiliza la función InStr para comparar textos:
Código:
n = InStr(1, variable, "palabra", vbTextCompare)
variable es el primer texto de la comparación.
"palabra" es el segundo texto de la comparación.
vbTextCompare es el método a utilizar en la comparación
Si el valor que te devuelve el programa de n es igual a 0 entonces esque no encuentra la palabra. Si es 1 o mayor que 1 si encontró dicha palabra. El valor de n es la posición en la que se encuentra el texto encontrado (A cada caracter sumale 1 posición).
Espero que estos codes te sirvan de ayuda. Espero tu respuesta tanto como si funciona tanto como si no.