WINSOCK循环取web源码某列表数据,该如何解决

WINSOCK循环取web源码某列表数据
WebBrowser1：
UCase(WebBrowser1.Document.All(i).tagName) = "INPUT" 有这种方法，不知道winsock中获取网页数据值，有什么好的办法
比如网页中有一列表数据，我怎么样把表中数据一行行的提出来

Text1.Text = SubStr(txtResponse.Text, "<td>","&nbsp;")

这种只能取到一处的值，接下来的怎么取，有什么好点的办法么

[解决办法]
winsock获取数据都很累人，分段接收，gzip解压，更别说过滤内容了。
[解决办法]
winsock先把整个文件接收完整.
剩下的就是文件操作了,就是个html文件,当做txt操作好了.

根据文件格式(表格名字,列名字...)操作