VB迴圈語句,vb中的迴圈語句

時間 2022-04-01 12:48:11

1樓:匿名使用者

for 《迴圈變數》=《初賦值》 to 《終值》 [step 《步長》]

…………

next 《迴圈變數》

在預設情況下,step被設為「1」,可以省略,step也可以設為負值,例如:

dim a=0

for i=1 to 10

a=a+i

next i

這是乙個最簡單的累加器的例子,把1到10累加在一起,然後賦值給「a」這樣的效果和上面是一樣的,只不過是倒著加罷了,請看:

dim a=0

for i=10 to 1 step –1

a=a+i

next i

while語句也是乙個很常用的迴圈語句,它的形式很多。

do while …… loop語句

while …… wend 語句

do …… loop while

while後面都跟邏輯條件判斷,「do while …… loop語句」和「while …… wend 語句」作用相似,都是先判斷while後面的條件是否為「真」,如果為「真」則執行裡面的語句,如果為「假」,則退出迴圈,迴圈直至條件為「假」終止。「do …… loop while 」與前兩者的區別在於,它不管條件的真假,都會先執行「do」後面的語句,也就是說,它至少執行語句一次。

與while用法相似的還有until語句,它是直至條件為真則終止迴圈,句式把while上述三個語句的while換成until即可,但是因為容易記混,所以我建議只用while即可。until 《條件》可以相當於while not 《條件》。

for迴圈和whlie迴圈應當根據適當的環境使用,它們有時也可替換。

最好找點資料看看,像vb神童教程,新手還是很容易看懂的。希望對你有幫助。。。

2樓:

呵呵,這些迴圈語句有個先執行後執行的問題,其實歸根都差不多,應用在不同地方而已,根據自己習慣了,我寫這麼多商品程式,絕大部分只使用for next 差不多了,相好好學,還是多看看資料吧,關鍵是多練習,靠別人給你將傻瓜式的解釋還是差一點啊

vb中的迴圈語句

3樓:

使用迴圈語句

使用迴圈重複執行**

迴圈用於重複執行一組語句。迴圈可分為三類:一類在條件變為 false 之前重複執行語句,一類在條件變為 true 之前重複執行語句,另一類按照指定的次數重複執行語句。

在 vbscript 中可使用下列迴圈語句:

do...loop: 當(或直到)條件為 true 時迴圈。

while...wend: 當條件為 true 時迴圈。

for...next: 指定迴圈次數,使用計數器重複執行語句。

for each...next: 對於集合中的每項或陣列中的每個元素,重複執行一組語句。

使用 do 迴圈

可以使用 do...loop 語句多次(次數不定)執行語句塊。當條件為 true 時或條件變為 true 之前,重複執行語句塊。

當條件為 true 時重複執行語句

while 關鍵字用於檢查 do...loop 語句中的條件。有兩種方式檢查條件:

在進入迴圈之前檢查條件(如下面的 chkfirstwhile 示例);或者在迴圈至少執行完一次之後檢查條件(如下面的 chklastwhile 示例)。在 chkfirstwhile 過程中,如果 mynum 的初始值被設定為 9 而不是 20,則永遠不會執行迴圈體中的語句。在 chklastwhile 過程中,迴圈體中的語句只會執行一次,因為條件在檢查時已經為 false。

sub chkfirstwhile()

dim counter, mynum

counter = 0

mynum = 20

do while mynum > 10

mynum = mynum - 1

counter = counter + 1

loop

msgbox "迴圈重複了 " & counter & " 次。"

end sub

sub chklastwhile()

dim counter, mynum

counter = 0

mynum = 9

domynum = mynum - 1

counter = counter + 1

loop while mynum > 10

msgbox "迴圈重複了 " & counter & " 次。"

end sub

重複執行語句直到條件變為 true

until 關鍵字用於檢查 do...loop 語句中的條件。有兩種方式檢查條件:

在進入迴圈之前檢查條件(如下面的 chkfirstuntil 示例);或者在迴圈至少執行完一次之後檢查條件(如下面的 chklastuntil 示例)。只要條件為 false,就會進行迴圈。

sub chkfirstuntil()

dim counter, mynum

counter = 0

mynum = 20

do until mynum = 10

mynum = mynum - 1

counter = counter + 1

loop

msgbox "迴圈重複了 " & counter & " 次。"

end sub

sub chklastuntil()

dim counter, mynum

counter = 0

mynum = 1

domynum = mynum + 1

counter = counter + 1

loop until mynum = 10

msgbox "迴圈重複了 " & counter & " 次。"

end sub

退出迴圈

exit do 語句用於退出 do...loop 迴圈。因為通常只是在某些特殊情況下要退出迴圈(例如要避免死迴圈),所以可在 if...

then...else 語句的 true 語句塊中使用 exit do 語句。如果條件為 false,迴圈將照常執行。

在下面的示例中,mynum 的初始值將導致死迴圈。if...then...else 語句檢查此條件,防止出現死迴圈。

sub exitexample()

dim counter, mynum

counter = 0

mynum = 9

do until mynum = 10

mynum = mynum - 1

counter = counter + 1

if mynum < 10 then exit do

loop

msgbox "迴圈重複了 " & counter & " 次。"

end sub

使用 while...wend

while...wend 語句是為那些熟悉其用法的使用者提供的。但是由於 while...wend 缺少靈活性,所以建議最好使用 do...loop 語句。

使用 for...next

for...next 語句用於將語句塊執行指定的次數。在迴圈中使用計數器變數,該變數的值隨每一次迴圈增加或減少。

例如,下面的示例將過程 myproc 重複執行 50 次。for 語句指定計數器變數 x 及其起始值與終止值。next 語句使計數器變數每次加 1。

sub domyproc50times()

dim x

for x = 1 to 50

myproc

next

end sub

關鍵字 step 用於指定計數器變數每次增加或減少的值。在下面的示例中,計數器變數 j 每次加 2。迴圈結束後,total 的值為 2、4、6、8 和 10 的總和。

sub twostotal()

dim j, total

for j = 2 to 10 step 2

total = total + j

next

msgbox "總和為 " & total & "。"

end sub

要使計數器變數遞減,可將 step 設為負值。此時計數器變數的終止值必須小於起始值。在下面的示例中,計數器變數 mynum 每次減 2。

迴圈結束後,total 的值為 16、14、12、10、8、6、4 和 2 的總和。

sub newtotal()

dim mynum, total

for mynum = 16 to 2 step -2

total = total + mynum

next

msgbox "總和為 " & total & "。"

end sub

exit for 語句用於在計數器達到其終止值之前退出 for...next 語句。因為通常只是在某些特殊情況下(例如在發生錯誤時)要退出迴圈,所以可以在 if...

then...else 語句的 true 語句塊中使用 exit for 語句。如果條件為 false,迴圈將照常執行。

使用 for each...next

for each...next 迴圈與 for...next 迴圈類似。

for each...next 不是將語句執行指定的次數,而是對於陣列中的每個元素或物件集合中的每一項重複一組語句。這在不知道集合中元素的數目時非常有用。

4樓:匿名使用者

第一題,先判斷,意義是直到y小於等於25,就跳出迴圈,否則(y>25)執行迴圈體,因此第一次判斷時,就沒能進入迴圈體,,,因此x,y都沒有變化

第二題: 2 3 5 7

解釋:這就是找素數的程式

5樓:匿名使用者

迴圈語句包括for-next、while-wend、do-loop語句比較常用的是for和whilefor-next語句:

for 變數 = 初值 to 終值 [step 步長]迴圈體next

while wend 語句:

while 條件

迴圈體wend

但滿足條件時,(如當i>5時),便退出迴圈,否則執行迴圈體。do-loop語句:

do迴圈體

...[exit do]

loop

迴圈體會在do 與 loop 之間不停迴圈。exit do 語句可有可無,是為了設定當滿足一定條件後,執行exit do 語句,即退出迴圈。for應該是最簡單的,因為不用自己去控制自增或自減,只要設定初始值,迴圈條件,和步階就行了~

VB中的迴圈語句有哪些,VB中的迴圈語句有哪些

使用迴圈語句 使用迴圈重複執行 迴圈用於重複執行一組語句。迴圈可分為三類 一類在條件變為 false 之前重複執行語句,一類在條件變為 true 之前重複執行語句,另一類按照指定的次數重複執行語句。在 vbscript 中可使用下列迴圈語句 do.loop 當 或直到 條件為 true 時迴圈。wh...

VB程式中關於迴圈語句 「FOR」的使用

顯示最後結果有很多方法,我最喜歡用的是 msgbox s s就是你的結果。dim i s 就是申明變數,for i 1 to 100 step 2意思就是i從1迴圈到100,每步跨2,迴圈中s的值是前一迴圈s的值加上現在的i值,next i就是進行下一步迴圈。就是這樣 很久沒研究vb了,試著 給你解...

還是關於VB迴圈語句的問題

上次有個朋友提過類似問題,結合msdn上的說法,我的理解是這樣,迴圈開始時會建立乙個迴圈條件,迴圈條件在迴圈過程中不會被改變,如果step是正數,迴圈條件應為迴圈變數 計數器 小於等於計數器的終值,注意這裡,msdn中從未將終值描述成為變數,而對於計數器才描述其為變數,舉例說明 e 10 for i...

vb中的for語句,VB中的For語句

一 vb中的for語句格式 for 迴圈變數 初值 to 終值 step步長 迴圈體 exit for next 迴圈變數 二 vb中的for語句功能 當迴圈變數的值在初值到終值範圍內時,執行一次迴圈體中的語句塊,並使初值增加乙個步長。當迴圈變數的值不在初值到終值範圍內時,就退出迴圈,執行next後...

vb中if 語句的運用,VB中if 語句的運用

你的理解不對。第乙個if語句執行後,m取的是a,b中的最大值 第二個if語句執行後,m取的是c,m中的最大值 當c m為假,m還是原來的m,不需些else子句。所以最後text4.text m,顯示的是a,b,c三者中的最大數。if 語句有幾種型式,如果直接寫成 if 判斷 theh 表示式 這時是...