루프를 다른 루프로 종료하는 방법은 무엇입니까?

Question

누구나 "for"루프가 한계에 도달했을 때 왜 새로운 단어를 얻을 수 없는지 아십니까?
의도는 =========================== 루프가
하지만 뭔가 매우 wrong'm
을하고 모든 새로운 단어를 회전한다는 것입니다 =====

Private Sub getWord() 
     Static wordCount As Integer 
     Dim txtLines As String() 
     txtLines = TextBox1.Text.Split(CChar(vbCrLf)) 

     If (wordCount < txtLines.Count) Then 
      WebBrowser1.Navigate("http://www.bing.com/search?q=" & txtLines(wordCount) & "&first=1&FORM=PERE") 
      wordCount = wordCount + 1 
     End If 

    End Sub 

    Dim i As Integer 
    Dim max As Integer = 40 

    Private Sub WebBrowser1_DocumentCompleted(sender As Object, e As WebBrowserDocumentCompletedEventArgs) Handles WebBrowser1.DocumentCompleted 
     If i >= max Then 
      getWord() 
     End If 

     If (WebBrowser1.ReadyState = WebBrowserReadyState.Complete) Then 

      For i As Integer = 1 To 40 Step 10 
       WebBrowser1.Navigate("http://www.bing.com/search?q=" & txtLines(wordCount) & "&first=" & i & "&FORM=PERE") 
      Next 

      Dim PageElement As HtmlElementCollection = WebBrowser1.Document.GetElementsByTagName("a") 
      Dim lk As String 
      For Each lks As HtmlElement In PageElement 
       lk = lks.GetAttribute("href") 
       ListBox1.Items.Add(lk) 
      Next 
     End If 
    End Sub    

Answer 1

나는 당신의 질문을 이해 완전히 잘 모르겠지만, 나는 그것을 자상 할게요.

루프에서 예상 값을 얻지 못한다면 For i As Integer = 1 To 40 Step 10을 사용할 때 1, 11, 21, 31 만 얻을 수 있지만 5 가지 값을 기대할 수 있습니까? 아마 당신은이 작업을 수행 할 필요가 :

For i As Integer = 1 To 41 Step 10