【正文】 例如，我們要在 1000~10000之間找一個既能被 3整除又能被 7整除的數，則可用下面的程序實現。常見的使用方式是： If 條件 Then Exit For 即當循環(huán)執(zhí)行過程中滿足某個條件時，就執(zhí)行循環(huán)退出語句結束循環(huán)。 1． Exit For 用于 For?Next 循環(huán)，在循環(huán)體中可以出現一次或多次。 下面的程序段都是錯誤的： For I=1 To 100 For I=1 To 100 For J=1 To For I=1 To 10 ?? ?? Next I Next I Next J Next I （ a）內外循環(huán)交叉 （ b）內外循環(huán)控制 變量同名 循環(huán)的退出 在某些情況下，為了減少循環(huán)次數或便于程序調試，可能需要提前強制退出循環(huán)。但并列循環(huán)的循環(huán)控制變量名可以相同，也可以不同。 str。 = amp。 amp。 程序如下： Private Sub Form_Click() Dim i%, j%, str$ Print Tab(35)。 打印九九乘法表。 我們前面學過的 For循環(huán)、 While循環(huán)、Do循環(huán)都可以互相嵌套。 循環(huán)的嵌套 在一個循環(huán)體內又包含了一個完整的循環(huán)，這樣的結構稱為多重循環(huán)或循環(huán)的嵌套。 條件是否為真？ 循環(huán)體 FTDo While ?Loop 執(zhí)行流程 條件是否為真？ 循環(huán)體 FTDo Until ?Loop 執(zhí)行流程 格式 2： Do [循環(huán)體 ] Loop {while|until} 條件 說明： 格式 2是先執(zhí)行，后判斷。 格式 1： Do {while|until} 條件 [循環(huán)體 ] Loop 說明： 格式 1是先判斷，后執(zhí)行。 1000” Do…Loop 循環(huán)結構 與前面介紹的 While循環(huán)相比， Do循環(huán)具有更強的靈活性，它可以根據需要決定是條件滿足時執(zhí)行循環(huán)體，還是一直執(zhí)行循環(huán)體直到條件滿足。 != amp。反之，則不然。如果開始條件就不成立，則循環(huán)體一次也不執(zhí)行。 該程序段的執(zhí)行結果是： 1 2 3 4 3． While循環(huán)的幾點說明 （ 1） While 循環(huán)語句本身不能修改循環(huán)條件，所以必須在循環(huán)體內設置相應語句，使得整個循環(huán)趨于結束，以避免死循環(huán)。每次執(zhí)行循環(huán)之前，都要計算條件表達式的值。 （ 4）執(zhí)行 Wend語句下面的語句。 （ 2）如果條件成立，就執(zhí)行循環(huán)體；否則，轉到（ 4）執(zhí)行。因此 While循環(huán)也叫當型循環(huán)。 語句格式如下： While 條件 [循環(huán)體 ] Wend 1． While語句說明 “條件”可以是關系表達式或邏輯表達式。 p End Sub 前面我們介紹了 For?Next 循環(huán)，它適合于解決循環(huán)次數事先能夠確定的問題。 n。注意， n值越大，結果越接近 π 值。 f End Sub 【 例 】 求 π值 。 分析：由階乘的定義，我們可以得出 N！=1*2*?*(N 2)*(N1)*N=(N1)！ *N，也就是說，一個自然數的階乘，等于該自然數與前一個自然數階乘的乘積， 程序如下： Private Sub Form_Click() Dim I%, f, n% n= InputBox(輸入一個自然數： , 輸入提示 , 10) f = 1 For I = 1 To n f = f * I Next I Print n。值得注意的是，無論初值、終值和步長值是什么數值類型，最后都要轉換成循環(huán)控制變量的類型。 我們通過分析下面的程序來進一步理解 For語句的執(zhí)行過程。 循環(huán)變量獲得初值 循環(huán)體 循環(huán)變量加步長T循環(huán)變量超過終值？FFor循環(huán)語句執(zhí)行流程 這里所說的“超過”有兩種含義，即大于或小于。 （ 3）執(zhí)行 Next語句，將循環(huán)變量增加一個步長值再賦給循環(huán)變量，轉到（ 2）繼續(xù)執(zhí)行。 （ 2）檢查循環(huán)變量的值是否超過終值。 （ 5） Next后面的循環(huán)變量與 For語句中的循環(huán)變量必須相同。如果步長是 1， Step 1可略去不寫。一般來說，其值為正，初值應小于終值；若為負，初值應大于終值。 （ 2）初值、終值： 都是數值型，可以是數值表達式。 我們將對這三種循環(huán)語句逐一介紹。, x% s = 0 For x = 1 To 99 Step 2 s = s + x ^2 Next x Print 1~100所有奇數的平方和 =。x的值累加到 99 s = s + x ^2 Print 1~100之