主题：狐狸爸爸帮忙，网页抓取数据问题

 网页数据采集求教

数据来源网页:

http://vip.stock.finance.sina.com.cn/mkt/#all_forex

获取数据代码:

Dim web As New System.Windows.Forms.WebBrowser()
web.Navigate("http://vip.stock.finance.sina.com.cn/mkt/#all_forex")
Do Until web.ReadyState = 4
    Application.DoEvents
Loop
MessageBox.Show("等待数据加载完成")
Dim elems As object = web.Document.GetElementById("tbl_wrap").GetElementsByTagName("tr")
MessageBox.Show("共获取 " & elems.count-1 & " 条数据")

……省略代码

以上代码能正常获取该网页的40条数据.

需要帮助的问题,请教如何才能一次性采集到此表中所有64条数据.
或者在执行代码时如何模拟执行点击网页中"每页显示"后面的80,让其先读取所有数据后再时行采集.