如何使它在vb.net中自动工作？

您知道如何使用此代码与backgroundworker协作吗

当我带着一名后台工作人员离开谷歌时，我会提出这个请求，如果可以的话，可以从谷歌页面收集链接

不在标签上，也不知道我是怎么做的。 我只想让它进入下一页，比如1，2，3，4，5，6，7，8，9等等，点击按钮，让它自己进入，并用后台工作人员或定时器在所有页面中拾取链接，或者如何让它自动工作，就像我说的我是新的一样。 就像谷歌有分页一样。 它只浏览一页，停在第一个数字上，不移动 远

多谢各位

Private Sub WebBrowser1_DocumentCompleted (ByVal sender As System.Object, ByVal e As System.Windows.Forms.WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted
         If (WebBrowser1.ReadyState WebBrowserReadyState.Complete =) Then
             For Each ClientControl I HtmlElement In WebBrowser1.Document.Links
                 IF NOT ClientControl.GetAttribute ("href"). Contains (Google) And ClientControl.GetAttribute ("href"). Contains ("http") and ClientControl.GetAttribute ("href"). Contains ("http") Then
                     ListBox1.Items.Add (ClientControl.GetAttribute ('href'))
                 end If
             Next
         end If

   end Sub

Private Sub Button1_Click (ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
         WebBrowser1.Navigate (http://www.google.lt/search?num=100&q = "& ComboBox1.Text)
         BackgroundWorker1.RunWorkerAsync ()
     end Sub

Private Sub BackgroundWorker1_DoWork (ByVal sender As Object, ByVal e As System.ComponentModel.DoWorkEventArgs) Handles BackgroundWorker1.DoWork
         For i = 0 to 100
             Threading.Thread.Sleep (200)
             BackgroundWorker1.ReportProgress (i)
         Next

     end Sub

     Private Sub BackgroundWorker1_ProgressChanged (ByVal sender As Object, ByVal e As System.ComponentModel.ProgressChangedEventArgs) Handles BackgroundWorker1.ProgressChanged
         Label1.Text = e.ProgressPercentage
     end Sub

如果我不明白我的意思，这里是我想要得到的例子。

---

如果您查看Google URL，您将看到一个

start=

查询

通过修改此选项，您可以直接进入所需页面：（假设每页有10个结果）

第1页

http://www.google.co.uk/#q=vb.net+book&start=0

第2页

http://www.google.co.uk/#q=vb.net+book&start=10

第3页

http://www.google.co.uk/#q=vb.net+book&start=20

---

这与我手动点击每一页完全不工作是一样的。任何帮助都会很好，但不是这样：(