No es que tenga mucha idea, (ni poca), pero buscando un poco he encontrado esto:
WebBrowser1.Document.ActiveElement.Value (valor del campo seleccionado)
En base a esto, sabiendo que los campos siempre son los mismos y suponiendo que están seguidos, se puede hacer una pequeña chapuza, (seguro que alguien se ríe):
Código vb:
Ver originalPrivate Sub Command1_Click()
Dim Campos As Integer
Dim SaltosTab as Integer
Dim F As Integer
Dim Matriz() As String
Campos = 3 ' campos a capturar
ReDim Matriz(Campos)
'WebBrowser1.Navigate "http://www.google.es"
WebBrowser1.SetFocus
SaltosTab = 0 ' aqui marcas cuantos TAB hacen falta para llegar al primer elemento que quieres capturar
For F = 1 To SaltosTab
SendKeys ("{TAB}")
DoEvents
Next F
For F = 1 To Campos
Matriz(F) = CStr(WebBrowser1.Document.ActiveElement.Value)
SendKeys ("{TAB}")
DoEvents
Next F
For F = 1 To Campos
MsgBox Matriz(F)
Next F
End Sub
Experimenta a ver si consigues que te funcione.
También he aprendido por si te sirve:
Igual que existe .Value también existe .Name, etc...
WebBrowser1.Document.ActiveElement.Name (nombre del campo seleccionado)
Si conoces el nombre de un campo puedes manipularlo por otros medios:
WebBrowser1.Document.getElementById("btnG").Value
En fin, aquí te dejo unas páginas con mejor info:
http://www.recursosvisualbasic.com.a...ser-execwb.htm http://www.recursosvisualbasic.com.a...webbrowser.htm
Saludos