vb中 for語句寫了exit for還要再寫next嗎
你必須了解For的基本語句
For 變量=初值 Top 終值
這里是循環體
Next 變量
上面的循環語句是必須的,至于Exit For是在循環過程中,達到某個條件而強行退出循環的,一般與判斷語句配合使用。例如:
For I=1 To 1000
X= X + I
If X>=1000 Then '這個判斷語句
Exit For '達到判斷語句條件強行退出循環,注意是強行退出循環。
End If
Next I
vb中for必須和exit for成對使用嗎
vb中for不必和exit for成對使用的。
vb中的for循環結構如下:
For number As Double = 2 To 0 Step -0.25
*(*ng & " ")
Next
*ine("")
for是for循環的入口,step是每一步的數值,next是本次循環結束,開始下一次循環。
內部實現:
當 For。Next 循環開始時,Visual Basic 將計算 start、end 和 step。Visual Basic 目前僅計算這些值然后將 start 到 counter。在語句塊運行,Visual Basic 與 end之前比較 counter。如果 counter 大于 end 值已為 (或更小,如果 step 為負),For 循環結束,并且控制傳遞到遵循 Next 條語句。否則,該語句塊運行。
每次 Visual Basic 遇到 Next 語句時,都按 step 遞增 counter,然后返回到 For 語句。它再次將 counter 與 end 進行比較,并再次根據結果運行塊或者退出循環。 這一過程將一直持續下去,直到 counter 超過 end 或者遇到 Exit For 語句為止。
循環不會停止,直到 counter 已通過 end。如果 counter 等于 end,則循環繼續。如果 step 為正數,確定是否運行循環代碼塊的比較運算將為counter = end。
如果更改 counter 的值,在循環內時,您的代碼可能會難以閱讀和調試。更改 start的值,end或 step 不影響確定的迭代值,當循環先輸入了。
如果嵌套循環,編譯器發出錯誤信號,如果它在內部級別的 Next 語句之前遇到了外部嵌套級別的 Next 語句。不過,僅當在所有 Next 語句中都指定了 counter 時,編譯器才能檢測到這種重疊錯誤。
求一道VB題的答案 關于 EXIT FOR語句
Private Sub Btn_Click()
Randomize() '初始化隨機數生成器,產生不重復的偽隨機數。
Dim a(9) As Integer,flag As Integer
flag=0
For i = 0 To 9
a(i) = Int(Rnd() * 89 + 10) ' 產生10-99的兩位隨機數
Print a(i), '輸出隨機產生的數,逗號將產生一個tab空格
If a(i) mod 2 =0 then
print "***" '標記偶數
flag=flag+1
if flag=4 then exit for '4個偶數結束for循環
end if
Print vbcrlf '輸出換行
Next i
End Sub
補充。在i的for循環內不能修改i的值。否則會出錯。
VB FOR EXIT的問題
這要看你的目的。
比方說有5個不同顏色的蛋糕給你選,要求紅色的就吃掉,則: For i = 1 To 5 If 蛋糕(i) = 紅色 Then 吃掉 End If Next如果要求紅色蛋糕只能吃一個,吃過了就不能再吃了,則: For i = 1 To 5 If 蛋糕(i) = 紅色 Then 吃掉 Exit For End IfNext如果要求只能吃紅色蛋糕,一旦遇到其他顏色的蛋糕就退出選擇(換句話說如果第一個蛋糕就不是紅色的,那么即使后面有紅色蛋糕也不能吃了),則: For i = 1 To 5 If 蛋糕(i) = 紅色 Then 吃掉 Else Exit For End IfNext。
轉載請注明出處華閱文章網 » for語句exitfor