如何使語(yǔ)句循環(huán)的方法
篇一：VB中循環(huán)結(jié)構(gòu)之Do While-Loop、Do Loop-While語(yǔ)句
我和以養(yǎng)德·綠以潤(rùn)心·誠(chéng)以致遠(yuǎn)·博以勵(lì)學(xué)第 1 頁(yè) 共 3 頁(yè)
我和以養(yǎng)德·綠以潤(rùn)心·誠(chéng)以致遠(yuǎn)·博以勵(lì)學(xué)第 2 頁(yè) 共 3 頁(yè)
我和以養(yǎng)德·綠以潤(rùn)心·誠(chéng)以致遠(yuǎn)·博以勵(lì)學(xué)第 3 頁(yè) 共 3 頁(yè)
篇二：VB循環(huán)語(yǔ)句的用法
1.While...Wend 語(yǔ)句
只要指定的條件為 True，則會(huì)重復(fù)執(zhí)行一系列的語(yǔ)句。
語(yǔ)法
While condition
[statements]
..
Wend
2.Do...Loop
2.1 第一種用法
用 Do 循環(huán)重復(fù)執(zhí)行一語(yǔ)句塊，且重復(fù)次數(shù)不定。Do...Loop 語(yǔ)句有幾種演變形式，但每種都計(jì)算數(shù)值條件以決定是否繼續(xù)執(zhí)行。如同 If...Then condition 必須是一個(gè)數(shù)值或者值為 True（非零）或 False（零）的表達(dá)式。
在下面的 Do...Loop 循環(huán)中，只要 condition 為 True 就執(zhí)行 statements。
Do While condition
statements
..
Loop
2.2 第二種用法
Do...Loop 語(yǔ)句的另一種演變形式是先執(zhí)行語(yǔ)句，然后在每次執(zhí)行后測(cè)試 condition。這種形式保證 statements 至少執(zhí)行一次：
Do
statements
Loop While condition
注:其它兩種演變形式類(lèi)似于前兩個(gè)，所不同的是，只要 condition 為 False 而不是 True，它們就執(zhí)行循環(huán)。
循環(huán)零次或多次
Do Until condition
statements
Loop
至少循環(huán)一次
Do
statements
Loop Until condition
3.For...Next
在不知道循環(huán)內(nèi)需要執(zhí)行多少次語(yǔ)句時(shí)，宜用 Do 循環(huán)。但是，在知道要執(zhí)行多少次時(shí)，則最好使用 For...Next 循
環(huán)。與 Do 循環(huán)不同， For 循環(huán)使用一個(gè)叫做計(jì)數(shù)器的變量，每重復(fù)一次循環(huán)之后，計(jì)數(shù)器變量的值就會(huì)增加或者減少。For 循環(huán)的語(yǔ)法如下： For counter = start To end [Step increment]
statements
Next [counter]
參數(shù) Counter、Start、end 和 increment 都是數(shù)值型的。
注意increment 參數(shù)可正可負(fù)。如果 increment 為正，則 Start 必須小于等于 end，否則不能執(zhí)行循環(huán)內(nèi)的語(yǔ)句。如果 increment 為負(fù)，則 Start 必須大于等于 end，這樣才能執(zhí)行循環(huán)體。如果沒(méi)有設(shè)置 Step，則 increment 缺省值為 1。
實(shí)例：
以下代碼打印出所有有效的屏幕字體名：
Private Sub Form_Click ()
Dim I As Integer
For i = 0 To Screen.FontCount
Print Screen.Fonts (i)
Next
End Sub
4.For Each...Next
For Each...Next 循環(huán)與 For...Next 循環(huán)類(lèi)似，但它對(duì)數(shù)組或?qū)ο蠹现械拿恳粋�(gè)元素重復(fù)一組語(yǔ)句，而不是重復(fù)語(yǔ)句一定的次數(shù)。如果不知道一個(gè)集合有多少元素， For Each...Next 循環(huán)非常有用。
For Each...Next 循環(huán)的語(yǔ)法如下：
For Each element In group
statements
Next elementt
例如，下面的子過(guò)程打開(kāi) Biblio.mdb，把每一個(gè)表的名字加到列表框中。
Sub ListTableDefs ()
Dim objDb As Database
Dim MyTableDef as TableDef
Set objDb = OpenDatabase("c:vbiblio.mdb", _
True, False)
For Each MyTableDef In objDb.TableDefs ()
List1.AddItem MyTableDef.Name
Next MyTableDef
End Sub
請(qǐng)記住使用 For Each...Next 時(shí)的幾點(diǎn)限制：
對(duì)集合，element 只能是 Variant 變量，或一般的 Object 變量，或“對(duì)象瀏覽器”中列出的對(duì)象。
對(duì)數(shù)組，element 只能是 Variant 變量。
For Each...Next 不能與用戶(hù)自定義類(lèi)型的數(shù)組一起使用，因?yàn)?Variant 不可能包含用戶(hù)自定義類(lèi)型。
篇三：簡(jiǎn)說(shuō)VB循環(huán)語(yǔ)句
循環(huán)結(jié)構(gòu)是指在一定條件下多次重復(fù)執(zhí)行一組語(yǔ)句。VB中提供了兩種循環(huán)語(yǔ)句，它們是For語(yǔ)句和Do語(yǔ)句。
1. For循環(huán)語(yǔ)句
如果己知某一段代碼需要重復(fù)執(zhí)行的次數(shù)，可以使用For循環(huán)語(yǔ)句。該語(yǔ)句的一般形式如下：
該段代碼的功能是在窗體上顯示8行文本，如圖3.16所示。如果不采用循環(huán)結(jié)構(gòu)，則需要使用8條Print語(yǔ)句來(lái)實(shí)現(xiàn)相同的功能。
For語(yǔ)句中的.循環(huán)變量必須是數(shù)值型，初值、終值以及步長(zhǎng)則是具體的數(shù)值
For…next
步長(zhǎng)用來(lái)指定循環(huán)變量每次的增量，當(dāng)所有循環(huán)體中的語(yǔ)句都執(zhí)行后，循環(huán)變量就會(huì)自動(dòng)增加一個(gè)步長(zhǎng)。默認(rèn)的步長(zhǎng)為1.For語(yǔ)句的執(zhí)行流程如圖3.17所示。
具體執(zhí)行流程為：
�。�1）將初值賦給循環(huán)變量。
�。�2）判斷循環(huán)變量的取值是否在終值范圍內(nèi)否則結(jié)束循環(huán)，執(zhí)行Next的下一條語(yǔ)句。
（3）將循環(huán)變量的取值自動(dòng)增加一個(gè)步長(zhǎng)，然后回轉(zhuǎn)到步驟（2）繼續(xù)執(zhí)行。
若是則執(zhí)行循環(huán)體內(nèi)的語(yǔ)句，循環(huán)中可以在任何位置放置任意個(gè)Exit FOr語(yǔ)句，該語(yǔ)句的作用是退出循環(huán)，轉(zhuǎn)到Next語(yǔ)句的下一條語(yǔ)句。Exit For語(yǔ)句經(jīng)常在條件判斷之后使用，例如在If…Then語(yǔ)句之后。
例如，修改上例如下：
實(shí)例3.3打印九九乘法表
本例講解怎樣打印九九乘法表，如圖3.18所示。九九乘法表的打印看起來(lái)很煩瑣，但是如果使用嵌套循環(huán)，則問(wèn)題變得非常簡(jiǎn)單。
打開(kāi)【代碼】窗口，編寫(xiě)窗體的Click事件過(guò)程如下：
在該段代碼中，首先使用Print方法打印出標(biāo)題和一個(gè)空行。然后使用了一個(gè)兩重的嵌套循環(huán)結(jié)構(gòu)。關(guān)于Print方法的使用細(xì)節(jié)請(qǐng)參見(jiàn)下一章。
2.Do循環(huán)語(yǔ)句
如果不知道某一段代碼需要重復(fù)執(zhí)行的次數(shù)，可以使川Do循環(huán)語(yǔ)句0該語(yǔ)句有兩種基本形式：
�。�1）Do While<表達(dá)式>
循環(huán)體
[Exit Do]
Loop
這種格式的Do循環(huán)先判斷條件，后執(zhí)行循環(huán)體。與If…Then語(yǔ)句類(lèi)似，While子句的<表達(dá)式>一般是關(guān)系表達(dá)式或邏輯表達(dá)式，也可以是算術(shù)表達(dá)式。如果表達(dá)式的值不為零（True）,即條柞為真，則執(zhí)行循環(huán)體。如果表達(dá)式的值為零〔False） ,即條件為假，則終止循環(huán)。其流程如圖3.19所示。
例如，通過(guò)下列代碼，可以求出2460和345的最大公約數(shù)。
在Do…Loop中可以在任何位置放置任意個(gè)數(shù)的Exit Do語(yǔ)句，隨時(shí)跳出Do-Loop循環(huán)。Exit Do通常用于條件判斷之后，例如If…then,在這種情況下，Exit Do語(yǔ)句將控制權(quán)轉(zhuǎn)移到緊接在Loop命令之后的語(yǔ)句。
如果Exit Do使用在嵌套的Do…Loop語(yǔ)句中，則Exit Do會(huì)將控制權(quán)轉(zhuǎn)移到Exit Do所在位置的外層循環(huán)。
While子句也可以出現(xiàn)在Loop語(yǔ)句后，形式如下：
Do.
循環(huán)體。
[Exit Do].
Loop While<表達(dá)式>.
這種格式的特點(diǎn)是先執(zhí)行循環(huán)體，后判斷條件。也就是說(shuō)第一次進(jìn)入循環(huán)是無(wú)條件的。循環(huán)體至少會(huì)被執(zhí)行一次，其流程如圖3.20所示。而如果While子句出現(xiàn)在Do后，則可能一次也不執(zhí)行。
�。�2） Do Until<表達(dá)式>.
循環(huán)體。
[Exit Do].
Loop.
將While子句換成Until子句后，情況正好相反。只有當(dāng)表達(dá)式的值不為O（ture）,即條件為真時(shí)才終止循環(huán)，否則繼續(xù)循環(huán)。
【如何使語(yǔ)句循環(huán)的方法】相關(guān)文章：
中考學(xué)生如何使學(xué)習(xí)變的輕松02-11
如何銷(xiāo)售使消費(fèi)者嘗到口碑營(yíng)銷(xiāo)的甜頭08-22
與上司如何相處的方法08-10
如何去眼袋的方法技巧02-13
循環(huán)經(jīng)濟(jì)調(diào)研報(bào)告04-20
如何開(kāi)口獲得升職機(jī)會(huì)英語(yǔ)句子06-20
外企HR如何掌握解聘員工的方法03-05