第六堂VB的判斷流程控制.ppt

《第六堂VB的判斷流程控制.ppt》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、第六堂VB的判斷流程控制VISUALBASIC2010程式設計16堂特訓流程圖符號在這一堂課和下一堂課中，我們都會借助流程圖，來幫忙我們理解程式的流程是如何進行的。在這本書中，會用到幾個常見的流程圖符號，包括：箭號為程式流程符號，矩形代表程式處理動作，菱形代表決策判斷動作。名稱符號圖形意義開始或結束符號表示流程的開始或結束。流程符號表示程式流程進行的方向。程序處理符號表示要進行的處理工作。輸入或輸出符號表示資料輸入或結果輸出。決策判斷符號根據條件式來判斷進行方向。VB的判斷敘述VisualBasic的判斷敘述和其他程式語言的判斷敘述大同小

2、異，本堂課將介紹VB的判斷敘述，包括：「If…Then…」、「If…Then…Else…EndIf」、「If…Then…ElseIf…Else…EndIf」、「SelectCase」以及「巢狀If」等等。判斷結構之IF…THEN…日常生活中我們就經常使用到判斷結構，例如若今天會下雨，我就要帶雨傘出門。If條件式Then單一敘述If(Score>=60)ThenMsgBox(“成績及格”)判斷結構之IF…THEN…『敘述區塊的If…Then…EndIf』If條件式Then程式區塊EndIfIf(Score>=60)ThenDebug.Pri

3、nt(Score)Debug.Print(“成績及格”)EndIf判斷結構之If…Then…Else…EndIf當條件是成立時，執行某敘述，當條件是不成立時，執行另一個敘述。If條件式Then程式區塊1Else程式區塊2EndIfIf(Score>=60)ThenDebug.Print(Score)Debug.Print(“成績及格”)ElseDebug.Print(Score)Debug.Print(“成績不及格”)EndIf判斷結構之IF…THEN…ELSEIF…ELSE…ENDIF我們將成績除了分成及格與不及格外，尚可將及格成績更細

4、分為一百分到八十分、八十分到六十分兩個等級，此時就需使用到多途判斷的結構，以下就此結構進行介紹。判斷結構之If…Then…ElseIf…Else…EndIfIf條件式1Then程式區塊1ElseIf條件式2Then程式區塊2ElseIf條件式3Then程式區塊3…ElseIf條件式NThen程式區塊NElse程式區塊N+1EndIfIf(Score>=80)ThenDebug.Print(Score)Debug.Print(“成績介於80到100分”)ElseIf(Score>=60)ThenDebug.Print(Score)Debug

5、.Print(“成績介於60到80分”)ElseDebug.Print(Score)Debug.Print(“成績低於60分”)EndIf判斷結構之SelectCaseSelectCase也是多重選擇的判斷結構，利用變數或運算式的值來選擇程式區塊。SelectCase變數或運算式Case條件1程式區塊1Case條件2程式區塊2…Case條件N程式區塊NCaseElse程式區塊N+1EndSelectSelectCaseInput_MonthCase1To3MsgBox("春季")Case4To6MsgBox("夏季")Case7To9Ms

6、gBox("秋季")Case10To12MsgBox("冬季")CaseElseMsgBox("請輸入1-12數字")EndSelect巢狀判斷結構所謂巢狀判斷結構，就是判斷結構內還有判斷結構，例如先使用一個If-Then-Else結構判斷成績是否在0到100分的範圍，再包含另一個If-Then-Else判斷成績是否及格，這樣的結構就稱為巢狀判斷結構，有時也稱為多層次的If敘述。巢狀判斷結構If條件式1ThenIf條件式2Then程式區塊AElse程式區塊BEndifElseIf條件式3Then程式區塊CElse程式區塊DEndifEnd

7、ifIf((Score>=0)And(Score<=100))ThenIf(Score>=60)ThenDebug.Print(Score)Debug.Print(“成績及格”)ElseDebug.Print(Score)Debug.Print(“成績不及格”)EndIfElseDebug.Print(“成績格式有誤”)EndIf第六堂課結束