第六章回圈.ppt

第6章 迴圈結構 6-1 計數迴圈 6-2 條件迴圈 6-3 巢狀迴圈 6-4 While/End While迴圈 6-5 跳出與繼續迴圈 6-6 錯誤處理 6-1 計數迴圈 6-1-1 For To/Next迴圈 6-1-2 For Step/Next迴圈 6-1-1 For To/Next迴圈-語法 For To/Next迴圈可以執行固定次數的迴圈，預設每次增加1，如果到達結束條件，就結束迴圈執行。其語法如下所示： For 變數 = 起始值 To 終止值 程式區塊 Next 變數 上述迴圈的「變數」是計數器變數，其範圍是從「起始值」到「終止值」，每次增加1，執行迴圈的次數是：「終止值」-「起始值」+1次，其中Next關鍵字後的「變數」可以省略。 6-1-1 For To/Next迴圈-語法 例如：計算6加到15總和的迴圈，如下所示： Dim intI, intTotal As Integer For intI = 6 To 15 intTotal = intTotal + intI Next intI 上述程式碼是從6加到15以計算總和，變數intI值依序為6、7、8、9、..和15，總共執行15-6+1共10次迴圈。 6-1-1 For To/Next迴圈-流程圖 6-1-2 For Step/Next迴圈 For/Next迴圈的增量如果不是1，我們可以使用Step關鍵字指定每次增加或減少的量。如果使用負數值，表示每次是將計數器變數減掉Step值，此時For Step/Next迴圈，如下所示： For intI = 100 To 1 Step -1 intTotal = intTotal + intI Next intI 上述程式碼倒過來從100加到1，變數intI值依序100、99、98、97、…、3、2、1共執行100次迴圈，其流程圖和上一節圖例相似，只是每次增加量改為-1。 6-2 條件迴圈 6-2-1 Do While/Loop迴圈 6-2-2 Do Until/Loop迴圈 6-2-3 Do/Loop While迴圈 6-2-4 Do/Loop Until迴圈 6-2-1 Do While/Loop迴圈-說明 Do/Loop迴圈可以使用While條件在迴圈開頭檢查，開頭檢查的目的是檢查是否允許進入迴圈，當While的測試條件成立才能進入迴圈。例如：計算1萬元5年複利18%的本利和，如下所示： intI = 1 dblTotal = 10000 dblRate = 0.18 Do While intI = 5 dblTotal += dblTotal * dblRate intI = intI + 1 Loop 6-2-1 Do While/Loop迴圈-流程圖 6-2-2 Do Until/Loop迴圈-說明 Do/Loop迴圈如果使用Until條件在迴圈開始檢查，迴圈是執行到條件成立為止，如果條件不成立就進入迴圈。例如：計算1萬元5年複利18%的本利和，如下所示： intI = 1 dblTotal = 10000 dblRate = 0.18 Do Until intI 5 dblTotal += dblTotal * dblRate intI = intI + 1 Loop 6-2-2 Do Until/Loop迴圈-流程圖 6-2-3 Do/Loop While迴圈-說明 Do/Loop迴圈可以使用While條件在迴圈結尾檢查，此時Do/Loop迴圈至少會執行一次。例如：計算1萬元5年複利18%的本利和，如下所示： intI = 1 dblTotal = 10000 dblRate = 0.18 Do dblTotal += dblTotal * dblRate intI = intI + 1 Loop While intI = 5 6-2-3 Do/Loop While迴圈-流程圖 6-2-4 Do/Loop Until迴圈-說明 Do/Loop迴圈如果使用Until條件在迴圈結尾檢查，迴圈也一樣至少執行一次。例如：計算1萬元5年複利18%的本利和，如下所示： intI = 1 dblTotal = 10000 dblRate = 0.18 Do dblTotal += dblTotal * dblRate intI = intI + 1 Loop Until intI 5 6-2-4 Do/Loop Until迴圈-流程圖 6-3 巢狀迴圈 6-3-1 For/Next巢狀迴圈 6-3-2 混合的巢狀迴圈 6-3-1 For/Next巢狀迴圈-說明 For/Next巢狀迴圈是在For/Next迴圈中，擁有