第七章回圈.pptVIP

計算機程式 廖文淵 Department of Computer Science and Engineering De-Lin Institute of Technology andres@dlit.edu.tw 第七章 迴圈 7-1 For...Next敘述 For...Next迴圈常被用來執行某些重複且次數固定的工作 For…Next的指令格式 遇到Next敘述後，Visual Basic會自動為計次變數累加上數值C 回到For敘述的下一列開始執行，如此週而復始運作，形成一個迴圈 當計次變數的值增加到大於數值B時，則結束For...Next迴圈，進入Next敘述的下一行程式繼續執行 假設我們要Print出1到10000的數字，那麼For...Next迴圈應該這麼寫： 使用For...Next迴圈的重點 For與Next指令必須成對出現，而Next後的計次變數名稱可以省略不寫 For...To中間必須設定一個計次變數、一個等號(=)、一個起始值。計次變數會在這邊設定初值，在To 之後預設是最後的“目標值” For...Next迴圈如果不加Step敘述，預設每次增加值為1。如果要改變增加值，可以在For...To...之後加上Step敘述來設定 計次變數可以是正數、負數、小數、變數或運算式，但是一般都是用整數 在For I=X To Y的敘述中，如果一開始就已經是XY，程式會跳到相對應的Next之後繼續執行 Exit For 如果For...Next的計次變數尚未到達目標值，但是要提前結束迴圈，可以在For...Next間適當的地方插入Exit For敘述 For...Next迴圈實作 範例(EX7-1) 計算1的7次方到50的7次方的總和 執行的結果 7-2 Do...Loop敘述 如果迴圈執行次數不明確時，可以選擇Do...Loop或While...Wend敘述 Do...Loop可以完全取代While...Wend的地位 While及Until 前測式迴圈 前測式迴圈實作 範例一 計算自然數ｅ的近似值。(範例EX7-2) 說明 產生自然數的公式為 步驟 在Form上面放一個Label控制項，以便印出結果 接著請在Form_Activate事件程序中填入下列程式碼 範例二 同樣的例子，改用Do Until的寫法就是：(範例EX7-3) 後測式迴圈 後測式迴圈將測試條件放在程式區塊敘述之後，因此迴圈至少會執行一次，然後才會測試所設定的條件，以決定是否再繼續執行迴圈 將計算自然數ｅ改成後測式迴圈 (範例EX7-4、EX7-5) Exit Do 如果要提前結束Do...Loop迴圈(也就是尚未到達前、後出口預設的測試條件時)，可以在Do...Loop間適當的地方插入Exit Do敘述 7-6 巢狀迴圈(Nested Loop) 區塊敘述 If…Then等條件判斷 迴圈 區塊間可以形成巢狀結構 巢狀迴圈的結構 使用巢狀迴圈的要點 對於For...Next敘述形成的巢狀迴圈而言，每個迴圈的計次變數名稱不可相同 在For…Next所形成的巢狀迴圈敘述中，基本上每一個For敘述都必須有一個Next對應，但是迴圈的終點如果相同，則可以共用一個Next敘述 巢狀迴圈實作 範例(EX7-8) 用巢狀迴圈製作九九乘法表 步驟 需要一個標籤控制項，作為顯示九九乘法表的區域 依照下表修改相關物件的屬性值 在表單的Form_Load事件程序中填入下列程式碼 7-3 計時器(Timer) 計時器每隔一定的時間，系統就會發出一次計時器的Timer事件、觸發Timer事件程序 計時器應用場合： 計算時間 定時存檔 定時更新螢幕畫面 調整執行速度 計時器無法精確計時 受到1/18.2秒(Tick)的限制 WM_TIMER訊息是屬於低優先權的，如果有其他訊息要執行，那麼WM_TIMER可能會被延後 放置計時器 在代表計時器(Timer)的圖示上Double-click，或以拖放(Drag-and-Drop)的方式將計時器放在表單上 計時器在執行時不會顯示在螢幕上，所以計時器的外觀、位置是沒有意義的 計時器常用的屬性 Interval 設定引發Timer事件程序的間隔時間 單位為千分之一秒 值為0(預設值)時，代表Disable計時器的功能 Interval屬性欄所能設定的值是在0 到 64,767 之間，也就是說，timer事件之間隔最長只能比一分鐘長一點點 常用的事件程序 Timer事件程序 Timer事件會按照Interval所設定的時間定時發生，然後引發Timer事件程序 例如：將計時器的Interval屬性為1000(=1秒)，那麼每一秒都會引發一次Timer事件程序 使用計時器的步驟 在Form上放置一個計時器物件 在屬性