Visual Basic 6 - Copiare testo da textbox a campo di testo web

Ok, in poche parole vorrei creare un programma che , cliccando su un command, copia il testo di una textbox nel campo di testo di una pagina web, ad esempio nel campo di ricerca di google.......possibilmente utilizzando un webbrowser.

io ho trovato questo codice:

Private Sub Command1_Click()
caricaTxt False
End Sub

Private Sub Form_Load()
WebBrowser1.Navigate2 "http://www.libero.it"
End Sub

Private Sub caricaTxt(soloTesto As Boolean)
Text1.Text = ""
If soloTesto Then
Text1.Text = WebBrowser1.Document.Body.TabIndex = 1
Text1.Text = WebBrowser1.Document. _
documentElement.OuterHTML
End If
End Sub

ma quando clicco sul command il textbox rimane vuoto....

help!

"hai trovato questo codice" ma non funziona, e che vuoi da noi?

Volevo solo sapere come fare quanto richiesto nel messaggio sopra