程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> Visual Basic語言 >> VB.NET >> vb.net的循環語句

vb.net的循環語句

編輯:VB.NET

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可以是數組,也可以是一個集合。

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved