vb.net的循環語句。本站提示廣大學習愛好者：（vb.net的循環語句）文章只能為提供參考，不一定能成為您想要的結果。以下是vb.net的循環語句正文
一、For...Next循環
For...Next循環在事情進程中反復執行指定的一組語句，直抵達到指定的執行次數為止。當要執行幾個相關的運算、操作屏幕上的多個元素或許處置幾段用戶輸出時，這種辦法就非常有用了。For...Next循環實踐上是一大串順序語句的一種簡單寫法，由於這一長串語句中的每一組語句都完成相反的義務，Visual Basic只定義其中的一組語句並依照順序的需求反復執行這組語句，直至到達規則的次數。For...Next循環的語法如下所示：
For Variable=start To end
statements
Next[variable]
上述語法中，“For”、“To”、“Next”是必需的關鍵字，等號（=）也不能省略。“variable”是數值型變量的稱號，它記載了以後的循環次數，這個變量用你順序中需求的數值型變量來替代。“start”和“end”是兩個數值，表示循環的初值和終值，你也需求運用順序中所需的相應值來替代它們。“For”和“Next”之間的一條或多條語句是該循環將反復執行的語句。例如，上面的For...Next循環在順序運轉時計算機揚聲器疾速響鈴四聲：
For i=1 To 4
Beep
Next
下面的循環與進程中反復書寫4條Beep語句是等價的。對編譯器來說，上述循環相當於：
Beep Beep Beep Beep
下面的循環中運用的變量是字母“i”，這是個習氣用法，它表示For...Next循環中的整型計數器。循環每執行一次，該計數器變量添加1（第一次執行循環時，該變量的值為1，也就是“start”指定的初值：最後一次執行循環時，該變量的值為4，也就是“end”指定的終值）。
二、Do循環
順序中除了運用For...Next循環外，也可以運用Do循環反復執行一組語句，直到某個條件為“True”時終止循環。關於事前不知道循環要執行多少次的狀況來說，Do循環非常有用和方便。例如，你要求用戶向數據庫中輸出姓名，直到用戶在輸出框中輸出單詞“Done”時終止輸出。這時，你可以運用Do語句來結構一個無量循環，當用戶輸出字符串“Done”時加入循環。依據循環條件的放置地位以及計算方式，Do循環有幾種格式，其中常用的語法格式為：
Do [{While|Until} condition]
statements
[Exit Do]
Loop
或
Do
statements
[Exit Do]
statements
Loop [{While|Until} condition]
假如條件為“Null”，則這個條件被以為是“False”。例如，上面的“Do”循環反復處置用戶輸出，直到用戶鍵入單詞“Done”時為止。
Do While InpName<>"Done"
inpName=InputBox("Enter your name or type Done to quit.")
If inpName<>"Done" Then
Label1.Text=inpName
End If
Loop
留意：測試條件的放置地位影響Do循環的執行方式。這個循環中的條件是InpName<>"Done"，Visual Basic編譯器把這個條件翻譯成“只需InpName變量的值不等於單詞“Done”,就不斷執行該循環語句”。這標明：當Do循環第一次執行時，假如循環項部的條件值不是True，那麼Do循環中的語句就不會執行。對下面的示例來說，假如在循環開端執行之前（能夠在事情進程中運用某個賦值語句停止賦值），InpName變量的值等於字符串“Done”,那麼Visual Basic將跳過整個循環體，並在Loop語句前面的語句持續執行。需求留意的是，這種格式的Do循環需求在循環體中寫上一條If...Then語句，以防止用戶鍵入的加入值顯示出來。假如希望順序中的循環體至多執行一次，那麼把條件放置在循環的尾部，例如：
Do Until InpName=InputBox("Enter your name or type Done to quit.")
If InpName<>"Done" Then
Label1.Text=InpName
Loop While InpName<>"Done"
這個循環與後面引見的Do循環類似，但是，這裡的循環條件在接納了InputBox函數中的姓名後停止測試。這種循環方式的優點是在測試循環條件前更新變量InpName的值，這樣，即便InpName在進入循環前的值為“Done”，也不會直接加入循環。在循環的尾部測試條件保證了循環體至多執行一次，但是，普通來說，這種格式的循環體中往往要添加一些額定的數據處置語句。
三、While循環
While循環執行到給定的條件為True才終止循環，與Do While類似。Whiel循環的語法為：
While condition statements [Exit While] statemenst End While
假如條件為Null，則這個條件被以為是False，假如條件為True，則一切的語句將被執行，直到End While，這時分控制權返還給While，condition再次被反省，假如condition為True,則持續執行While外部的語句，假如condition為False，則持續執行End While前面的語句。下例將闡明While循環的用法：
Dim Check As Boolean=True
Dim counter As Integer=0
Do '外層循環
While Counter<20
Counter+=1 '計數器加一
If Counter=20 Then
Check=False
Exit While '加入內層循環
End If
End While
Loop Until Check '加入外層循環
四、For Each...Next循環
For Each...Next循環與For...Next循環相似，但它對數組或對象集合中的每一個元素反復一組語句，而不是反復語句一定的次數。假如不知道一個集合有多少元素，For Each...Next循環十分有用。For Each...Next循環的語法如下：
For Each element in group
statements
Next element
例如，上面的例子應用For Each...Next循環來查找一切元素的Text屬性能否為“Hello”:
Dim Found As Boolean
Dim MyObject,MyCollection As Object
For Each MyObject In MyCollection
If MyObject.Text="Hello" Then
Found=True
Exit For
End If
Next
運用For Each...Next循環時的兩點闡明：
1.關於集合或數組中的元素，element既可以是普通的Object類型，也可以是特殊的Object對象。
2.group可以是數組，也可以是一個集合。
