Cita:
Iniciado por gnzsoloyo 
A mi entender estás recorriendo los objetos Html, pero no el contenido del objeto buscado.
Deberías leer un poco más de la documentación oficial:
[url]http://msdn.microsoft.com/es-AR/library/system.windows.forms.htmlelement%28v=vs.90%29.aspx[/url]
[url]http://msdn.microsoft.com/es-es/library/2962t2k8%28VS.90%29.aspx[/url]
En esencia: Tienes que obtener el objeto HtmlTable y luego recorrerlo para buscar lo que necesitas. No lo tomas entero para ponerlo.
Lo solucione con el siguiente codigo, usando el control listview
Código:
'get header information
Dim headerColumns = WebBrowser1.Document.GetElementsByTagName("thead")(0).Children(1).Children
'loop each element, if there is no innertext (some cols use GIF) then pull the class name
For Each childElement As HtmlElement In headerColumns
Dim columnName As String = String.Empty
If childElement.InnerHtml.Contains("class=") Then
columnName = childElement.InnerHtml.Substring(20, 2).ToUpper()
Else
columnName = childElement.InnerText
End If
'add columns to listview
ListView1.Columns.Add(columnName)
Next
'now pull all values
Dim childrenColumns = WebBrowser1.Document.GetElementsByTagName("tbody")(0).Children
For Each childRowElement As HtmlElement In childrenColumns
Dim lvItem As New ListViewItem
lvItem.Text = childRowElement.Children(0).InnerText
If childRowElement.Children.Count <> 6 Then Continue For
lvItem.SubItems.Add(childRowElement.Children(1).InnerText)
lvItem.SubItems.Add(childRowElement.Children(2).InnerText)
lvItem.SubItems.Add(childRowElement.Children(3).InnerText)
lvItem.SubItems.Add(childRowElement.Children(4).InnerText)
lvItem.SubItems.Add(childRowElement.Children(5).InnerText)
ListView1.Items.Add(lvItem)
Next childRowElement