《流程控制》PPT课件

《《流程控制》PPT课件》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第六章流程控制1課程內容6-1結構化程式設計6-2條件判斷6-3比較運算6-4邏輯運算6-5運算子的優先順序6-6核取方塊(CheckBox)2學習重點If……Then……Endif.例如:假如喜歡，(然後)就買回家。If…..Then……Else…….Endif.例如:假如喜歡，(然後)就買回家，不然欣賞就好。核取方塊例如:點菜單、價目表等36-1結構化程式設計結構化程式設計(Structuredprogramming)是設計、撰寫程式的一種方式它的宗旨在於簡化程式設計的流程，以及減少邏輯錯誤發生的機會結構化程式設計是使用控制流程的結構(Control-flowstruc

2、ture)、由上而下的一種設計方式區塊(blockstructure)的概念4循序結構循序結構的敘述會依照它們出現的順序來執行，控制權無條件的由一個敘述緊接著一個敘述、循序的傳遞下去循序結構是最基礎、簡單的一種方式它的邏輯圖如下所示以VisualBasic語法表示循序結構5選擇結構二元選擇結構If[Condition]Then[Statement]程式執行到這個結構時，會先去測試條件(Condition)如果結果為True(真)，那麼就執行Then後面的敘述(Statement)如果測試條件最後為False(假)，那麼就不去理會Then後面的敘述，而直接將控制權轉移至If的

3、下一個敘述這種結構的邏輯圖如下6If[Condition]Then[StatementA]Else[StatementB]程式執行這個結構時，會先去測試條件(Condition)如果結果為True(真)，那麼就執行Then後面的敘述(Statement)如果結果為False(假)，就執行Else後面的敘述(StatementB)不論執行了StatementA或是StatementB，執行過後都會將控制權轉移至If的下一個敘述邏輯圖如下所示7多元選擇結構在各種情況中，視情況選擇一組符合條件的動作來執行其邏輯圖如下8重複結構重複結構一般又稱為「迴圈(loop)」或「循環(ite

4、ration)」在迴圈結構中，通常會有一個測試條件，決定何時終止重複執行由於測試條件所出現的位置不同，又區分為前測式迴圈與後測式迴圈兩種9前測式迴圈前測式迴圈是在執行迴圈指令前先做測試，測試結果為True時，才會進入迴圈進入迴圈之後，開始執行Statement部分；執行過Statement的部分後，再繞回迴圈的測試點進行測試如果結果仍然為True，則再度進入Statement的部分執行如此週而復始不斷執行，直到測試條件變成False時，執行迴圈結構的下一個敘述如果測試條件永遠不會是False時，那麼迴圈就無法停止，形成所謂的無窮迴圈(Infiniteloop)10後測式迴圈

5、不論測試條件為何，先執行迴圈指令之後再做測試如果測試結果為True時，才會離開迴圈，否則再度進入迴圈其邏輯圖如下所示116-2條件判斷下圖是VisualBasic語言中所提供與條件判斷相關的各種語法、函數分類圖12If...Then敘述單行式If條件式Then當條件式為True時要執行的動作條件式(Condition)放的是比較(Comparison)運算或比較運算加邏輯運算的動作比較運算：將兩個資料以比較運算子連接。所得的結果是一個Boolean型別資料(True或False)如果在條件式中要進行一個以上的比較運算，那麼這些比較敘述間必須以邏輯運算子連接比較運算子的優先順

6、序高於邏輯運算子IfA>=BAndC<>1ThenLabel1=“條件成立”If(A>=B)And(C<>1)ThenA=B：C=C+1If(A>=B)And(C<>1)ThenA=B：_C=C+1加一個空格及底線，就連上下一列敘述13範例視窗在關閉之前會先詢問使用者是否真的要關閉它如果使用者回答[是(Y)]，那就關閉視窗、把程式結束如果回答[否(N)]，那麼就取消關閉的動作，一切恢復正常說明這個範例程式的表單不需要放置任何的控制項14當使用者用滑鼠在右上方的關閉鈕上按鈕時，螢幕上會出現如下圖所示的訊息對話方塊，詢問使用者是否要結束視窗如果按下[是(Y)]，則關閉全部視窗，

7、按[否(N)]則會到原來的視窗15步驟修改表單上的屬性Form1NamefrmIF_TestBorderStyle1CaptionIF...Then敘述測試在form的QueryUnload事件程序中填入程式碼1.PrivateSubForm_QueryUnload(CancelAsInteger,UnloadModeAsInteger)2.DimReturnCodeAsInteger3.ReturnCode=MsgBox(“要關閉視窗嗎？”,vbExclamation+vbYesNo,“詢問”)4.IfRetur