Ovviamente, dato che non ha ancora terminato di leggere la pagina.

La riga

Dim codice As String = WebBrowser1.DocumentText.toString()

e quindi anche il codice che usa la stringa, deve essere inserito nell'evento

WebBrowser1_DocumentCompleted

che indica il completamento del caricamento della pagina.