華閱文章網
VB循環語句主要有哪些帶說明
1、行IF語句
在一行中寫完的IF語句，稱為行IF語句。
語句格式：IF <；條件> THEN <；語句1> [ELSE <；語句2>]
命令功能：當條件滿足時，執行語句1，條件不滿足時，則執行語句2。
例子：輸入x，判斷x的正負。
程序編制如下：
Dim X As Integer
a: X = InputBox("X=:")
If X = 0 Then
Print "輸入錯誤，重新輸入！"
GoTo a:
End If
If X > 0 Then Print "x為正數"
If X < 0 Then Print "x為負數"
2、塊IF語句
語句格式：IF <；條件> THEN
<；語句組1>
[ELSE
<；語句組2>]
END IF
語句功能：當條件滿足時，執行語句組1；條件不滿足時，則執行語句組2。執行完相應語句組后，退出IF語句執行END IF語句以下語句序列。
例子：輸入年份，判斷此年份是否為潤年。
程序編制如下：
a: year = InputBox（"輸入年份："）
If year <= 0 Then
Print "輸入錯誤，重新輸入！"
GoTo a:
End If
If year Mod 4 = 0 And year Mod 100 <> 0 Or year Mod 400 = 0 Then
Print year;
Print "年是潤年"
Else
Print year;
Print "年不是潤年"
End If
3、FOR循環，語句格式：
FOR <；循環變量>=<；初值>TO<；終值>[STEP<；步長>]
[<；循環體>]
[EXIT FOR]
NEXT[<；循環變量>]
語句功能：從循環的初值到終值按步長增值控制計數重復執行循環體。
例子： 用FOR語句編寫計算S=1+2+3+…+100的程序。
FOR I=1 TO 100 STEP 1
S=S+I
NEXT I
4、DO循環，語句格式：
DO
<；循環體>
[EXIT DO]
LOOP
語句功能：無休止的執行循環體。如果有條件語句配合可控制退出循環。
例子： 用EXIT DO語句編寫計算S=1+2+3+…+100的程序。
X=0:S=0
DO
X=X+1
S=S+X
IF X>=100 THEN EXIT DO
LOOP
vb中的循環語句
循環語句包括For-Next、While-Wend、Do-Loop語句比較常用的是for和whileFor-Next語句：For 變量 = 初值 To 終值 [Step 步長] 循環體NextWhile Wend 語句：While 條件 循環體Wend但滿足條件時，（如當i>5時），便退出循環，否則執行循環體。
Do-Loop語句：Do循環體。[Exit Do]Loop循環體會在Do 與 Loop 之間不停循環。
Exit Do 語句可有可無，是為了設定當滿足一定條件后，運行Exit Do 語句，即退出循環。for應該是最簡單的，因為不用自己去控制自增或自減，只要設置初始值，循環條件，和步階就行了~。
【vb循環語句的題目：計算3-1/2+2/3-3/4+…+N/(N+1)的結果（N=10）
m = n / (n + 1)o = m * (-1) ^ n這兩句合成一句o=(-1)^n*n/(n+1)不知道這個地方有沒有數值轉換？小心第二道題 Private Sub Form_Activate()Dim a, b As IntegerFor a = 1 To 20For b = 1 To 33'c = 100 - a - b 'C變量用100-a-b代替 就用兩個變量了If (a * 5 + b * 3 + (100 - a - b) * 1 / 3 = 100) Then Print "公雞="； a， "母雞="； b， "小雞="； 100 - a - bNext bNext aEnd Sub。
vb中的循環語句
循環語句包括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應該是最簡單的，因為不用自己去控制自增或自減，只要設置初始值，循環條件，和步階就行了~
