流程圖與選擇結(jié)構(gòu)

CHAPTER7流程圖與選擇結(jié)構(gòu)

學(xué)習(xí)目標(biāo)讓讀者了解利用電腦處理問題的步驟流程圖的意義與用法程式的基本結(jié)構(gòu)有那些？選擇結(jié)構(gòu)有那些相關(guān)的敘述與函數(shù)？If-Then敘述的功能與用法If-Then-Else敘述的功能與用法巢式If敘述的用法Select敘述的功能與用法IIf、Choose與Switch函數(shù)的功能與用法MsgBox敘述與函數(shù)的功能與用法

－訊息方塊的產(chǎn)生與運(yùn)用

7-1利用電腦處理問題的步驟一、瞭解問題：先瞭解問題的要求及條件，確定需要輸入的資料及輸出的結(jié)果。二、設(shè)計(jì)解題程序：研究分析解題方法，構(gòu)思有效可行的處理程序，可以用流程圖(FlowChart)來表達(dá)所要處理的步驟。三、編寫程式：依程式語言的語法規(guī)則，將解題的程序轉(zhuǎn)寫成程式。四、上機(jī)執(zhí)行：將程式自鍵盤輸入電腦執(zhí)行。五、檢查結(jié)果：檢查輸出結(jié)果是否正確，如果不正確，再將錯(cuò)誤的原因找出來，並加以更正。

7-2流程圖的意義

流程圖是利用簡明、標(biāo)準(zhǔn)的圖形及線條，來描述程式的處理步驟。常用的流程圖有下列六種：

1.開始或結(jié)束符號（起訖符號）：表示流程圖的起點(diǎn)或終點(diǎn)，一個(gè)流程圖必須有起點(diǎn)及終點(diǎn)，而且只能有一個(gè)起點(diǎn)，但可以有一個(gè)以上的終點(diǎn)。

【例1】：開始或結(jié)束符號

開始結(jié)束2.處理符號：表示一件工作的處理，可在內(nèi)部列出計(jì)算公式或處理動(dòng)作

。

【例2】：計(jì)算a=b+c

處理符號

3.輸入或輸出符號：由輸入設(shè)備輸入資料，或由輸出設(shè)備輸出資料。

【例3】：輸入n值

輸入或輸出符號【例4】：輸出n值

a=b+c輸入n輸出n4.

流向符號：表示程式進(jìn)行的方向。

表示有一個(gè)條件要判斷，並根據(jù)其結(jié)果決定下一個(gè)執(zhí)行步驟。菱形內(nèi)註明待判斷的條件，通常有一個(gè)入口，二個(gè)或三個(gè)出口。

【例7】

5.決策符號

6.迴圈符號：利用迴圈（Loop）敘述時(shí)使用。

流程圖是畫來給人看的，可作為自己或別人瞭解程式做法及處理步驟的一種參考文件。初學(xué)程式語言的人，在設(shè)計(jì)程式之前，最好先利用流程圖來規(guī)劃整個(gè)程式結(jié)構(gòu)，訓(xùn)練處理問題的邏輯思路，對於程式邏輯比較容易融會貫通。（可利用Word軟體中的【插入/圖片/快取圖案/流程圖】來製作流程圖）

流程圖是畫來給人看的，可作為自己或別人瞭解程式做法及處理步驟的一種參考文件。初學(xué)程式語言的人，在設(shè)計(jì)程式之前，最好先利用流程圖來規(guī)劃整個(gè)程式結(jié)構(gòu)，訓(xùn)練處理問題的邏輯思路，對於程式邏輯比較容易融會貫通。（可利用Word軟體中的【插入/圖片/快取圖案/流程圖】來製作流程圖）

7-3程式的基本結(jié)構(gòu)一、循序結(jié)構(gòu)：指多個(gè)敘述依序執(zhí)行的方式。

【例1】

循序結(jié)構(gòu)x=Inputbox("請輸入第一個(gè)數(shù)")y=Inputbox("請輸入第二個(gè)數(shù)")s=x+yPrint"兩數(shù)的和=";s

意義：依序執(zhí)行四個(gè)敘述二、選擇結(jié)構(gòu)：根據(jù)某一條件是否成立，來選擇不同的執(zhí)行路徑。此結(jié)構(gòu)常用的有下列三種型式：1.If-Then結(jié)構(gòu)【例2】假如x>y就計(jì)算x-yIfx>yThena=x-y

意義：以x>y為條件式，如果成立就

執(zhí)行a=x-y

2.If-Then-Else結(jié)構(gòu)【例3】購買數(shù)量>=10，售價(jià)打八折Ifq>=10Thena=p*q*0.8Elsea=p*q

意義：以q>=l0為條件式，如果成立就執(zhí)行a=p*q*0.8，否則(條件不成立)就執(zhí)行a=p*q3.SelectCase結(jié)構(gòu)【例4】根據(jù)c值輸出剪刀、石頭或布SelectCasecCasela="剪刀"Case2a="石頭"Case3a="布"EndSelect

意義：以c為條件式的

比較對象，分別按c的內(nèi)容而做下列的處理:c=l→a="剪刀"，c=2→a="石頭"，c=3→a="布"三、重覆結(jié)構(gòu)：根據(jù)某一條件是否成立，來控制一段敘述的重覆執(zhí)行，而造成迴圈(Loop)的運(yùn)作。此結(jié)構(gòu)常用的有下列三種型式：(將在第九章介紹)l.For-Next結(jié)構(gòu)【例5】輸出1、3、5Fori=1To5Step2PrintiNexti

意義：For與Next之間

形成一個(gè)迴圈，其中

的敘述Printi，依

i=1、3、5共執(zhí)行三次，即印出1、3及5。(此例之條件為i由1到5，每次增加2)2.Do-While結(jié)構(gòu)【例6】輸出1、3、5

i=1DoWhilei<=5Printii=i+2Loop

意義：以i<=5為條件式

，如果條件成立，

就重覆執(zhí)行Do與Loop之間的敘述。

3.Do-Until結(jié)構(gòu)【例7】累加輸入的數(shù)值，直到輸入0為止a=Inputbox("請輸入一個(gè)數(shù)“)DoUntila=0s=s+aa=Inputbox("請輸入一個(gè)數(shù)")Loop意義：以a=0為條件，如果條件

成立就停止執(zhí)行Do與Loop之

間的敘述，否則就重覆執(zhí)行

該段敘述。

7-4If-Then敘述

If-Then的中文意思是「假如…就執(zhí)行…」。格式一：If條件式Then敘述

如果If後面的條件式成立了，就接著執(zhí)行Then後面的敘述，完成後再執(zhí)行下一列的敘述；如果條件未成立，則直接執(zhí)行下一列的敘述。

【例1】求某一數(shù)值變數(shù)a的絕對值。Ifa<0Thena=-aPrinta【例2】

輸入購書數(shù)量及單價(jià)，假如購買十本以上，就打八折，否則不打折，計(jì)算並輸出購書金額。1PrivateSubForm_Activate()2DimqtyAsInteger,priceAsInteger,moneyAsInteger3qty=InputBox("請輸入購書數(shù)量","購書數(shù)量")4price=InputBox("請輸入單價(jià)","單價(jià)")5money=price*qty6Ifqty>=10Thenmoney=money*0.87Print"購書金額=";money;"元"8EndSub【執(zhí)行情況】第一次執(zhí)行：

第二次執(zhí)行：1.輸入2.按此鈕3.輸入1.輸入2.按此鈕【例3】輸入1~3的代號，再輸出對應(yīng)的

剪刀、石頭、布）1PrivateSubForm_Activate()2DimcAsString3c=InputBox$("請輸入代號1~3")4Print"你選的是：";5Ifcode="1"ThenPrint"剪刀"6Ifcode="2"ThenPrint"石頭"7Ifcode="3"ThenPrint"布"8EndSub【執(zhí)行情況】1.輸入2.按此鈕【例5】

多個(gè)連續(xù)敘述的用法Ifk=1Thena=a+1:b=b+1:c=c+1Ifk=2Thena=a+3:b=b+3:c=c+3【說明】要連續(xù)執(zhí)行的多個(gè)敘述，可用冒號（:）分隔而排在同一列上。格式二：

If條件式Then敘述區(qū)段EndIf

（敘述區(qū)段代表

兩列以上的敘述）【例6】

例4改成格式二Ifk=1Thena=a+1b=b+1c=c+1EndIfIfk=2Thena=a+3b=b+3c=c+3EndIf

7-5IF-Then-Else敘述

格式一:IF條件式Then敘述1Else敘述2

(此格式係一列完成)【例1】

根據(jù)分?jǐn)?shù)（s），印出「及格」或「不及格」Ifs<60ThenPrint"不及格"ElsePrint"及格"或Ifs>=60ThenPrint"及格"ElsePrint"不及格"【例2】

計(jì)算購書金額（money）：數(shù)量（qty）在十本以上，就打八折，否則不打折。（price為單價(jià)）Ifqty>=10Thenmoney=price*qty*0.8_Elsemoney=price*qty格式二：

IF條件式Then敘述區(qū)段1Else敘述區(qū)段2EndIf【說明】假如在Then或Else下面的敘述區(qū)段中，再使用If敘述，則稱為巢式If敘述(NestedIfStatement)，如下：IF條件式1Then：IF條件式2Then敘述區(qū)段AElse敘述區(qū)段BEndIf：Else：IF條件式3Then敘述區(qū)段CElse敘述區(qū)段DEndIf：EndIf【例3】

根據(jù)分?jǐn)?shù)（s），印出「及格」「恭喜」或「不及格」「請多用功！」

Ifs<60ThenPrint"不及格"Print"請多用功！"ElsePrint"及格"Print"恭喜！"EndIf【例4】

巢式If敘述的應(yīng)用：根據(jù)分?jǐn)?shù)的範(fàn)圍，輸出文字如下：<60「不及格」「請多用功！」60~89「及格」「恭喜！」>=90「優(yōu)等」「發(fā)獎(jiǎng)狀一張！」Ifs<60ThenPrint"不及格"Print"請多用功！"ElseIfs<90ThenPrint"及格"Print"恭喜！"ElsePrint"優(yōu)等"Print"發(fā)獎(jiǎng)狀一張！"EndIfEndIfIF條件式1Then敘述區(qū)段1[ElseIf條件式mThen敘述區(qū)段m

：：]Else敘述區(qū)段nEndIf

格式三:最後用Else，安排上述條件都不符合時(shí)要執(zhí)行的工作

【

例5】

將例4改用格式三Ifscore<60ThenPrint"不及格"Print"請多用功！"ElseIfscore<90ThenPrint"及格"Print"恭喜！"ElsePrint"優(yōu)等"Print"發(fā)獎(jiǎng)狀一張！"EndIfc=InputBox$("請輸入一個(gè)字元")Ifc>="A"Andc<="Z"ThenPrint"大寫字母"ElseIfc>="a"Andc<="z"ThenPrint"小寫字母"ElseIfc>="0"Andc<="9"ThenPrint"數(shù)字"ElsePrint"不是字母或數(shù)字"EndIf

【例6】判斷輸入的字元是大寫字母、小寫字母、數(shù)字或都不是7-6IIf函數(shù)格式：IIf(條件式,資料1,資料2)1.如果條件式成立（結(jié)果為True），就傳回資料1，不成立（結(jié)果為False）則傳回資料2。2.資料1與資料2都可配用數(shù)值、字串或運(yùn)算式?！纠?】假如購書十本以上，就打八折，否則不打折，計(jì)算並輸出購書金額。Print"購書金額=";IIf(qty>=10,price*qty*0.8,price*qty);"元"【例2】根據(jù)分?jǐn)?shù)（score），印出「及格,恭喜！」或「不及格,請多用功！」PrintIIf(score>=60,"及格,恭喜！","不及格,請多用功！")SelectCase運(yùn)算式Case測試資料1敘述區(qū)段1Case測試資料2敘述區(qū)段2…Case測試資料n敘述區(qū)段n[CaseElse敘述區(qū)段]EndSelect

7-7SelectCase敘述如果末加列CaseElse，而所有Case後的測試資料都不符合時(shí)，將會順著離開Select結(jié)構(gòu)，而執(zhí)行EndSelect下面的敘述?！纠?】SelectCase的應(yīng)用01c=InputBox("請輸入代號1~3")02SelectCasec03Case104Print"剪刀"05Case206Print"石頭"07Case308Print"布"09CaseElse10Print"代號錯(cuò)誤!"11EndSelect

Case測試資料的用法一、使用單一或多個(gè)常數(shù)：如果運(yùn)算式的結(jié)果值等於其中一個(gè)常數(shù)，就算符合該Case的條件。如下：Case1Case

"SUN"Case1,2,3,4Case2,4,8,16,32,64Case"MON","TUE","WED","THU","FRI"Case"臺北","臺中","高雄"

二、利用常數(shù)指定範(fàn)圍：如果運(yùn)算式的結(jié)果值在範(fàn)圍之內(nèi)，就算符合該Case的條件。如下：Case1To4運(yùn)算式的結(jié)果值為1~4均符合條件Case"A"To"Z"運(yùn)算式的結(jié)果值為A~Z的26個(gè)字母均符合條件三、測試資料為關(guān)係運(yùn)算式的型態(tài)：必須在Case後加列關(guān)鍵字Is，如果運(yùn)算式的結(jié)果值符合該運(yùn)算式之條件，就算符合該Case的條件。如下：CaseIs>=60 運(yùn)算式的結(jié)果值≧60就符合條件CaseIs<>"SUN" 運(yùn)算式的結(jié)果值≠"SUN"就符合條件CaseIs="Y" 運(yùn)算式的結(jié)果值為"Y"就符合條件四、將前述三種用法混合使用。如下：

Case10To20,30,Is>60

運(yùn)算式的結(jié)果值為10~20，或等於30，或＞60，均符合條件。

Case"A"To"D","I","J",Is>="P"

運(yùn)算式的結(jié)果值為A~D，或I，或J，或P~Z等字母均符合條件【例2】輸入成績，再輸出如7-5節(jié)例4的文字。

01SelectCasescore

02CaseIs<6003Print"不及格"04Print"請多用功！"05Case60To8906Print"及格"07Print"恭喜！"08CaseElse09Print"優(yōu)等"10Print"發(fā)獎(jiǎng)狀一張！"11EndSelect【討論】此程式的考慮比較單純，如果分?jǐn)?shù)為負(fù)值或高於100分，會怎樣？應(yīng)該如何修改程式，才會比較周全？7-8Choose函數(shù)

格式：Choose(i,資料1[,資料2,…[,資料n]])

【功能】依i的整數(shù)值，傳回其後面參數(shù)中對應(yīng)的資料項(xiàng)【說明】1.當(dāng)i值不是整數(shù)時(shí)，會捨去其小數(shù)部分。2.當(dāng)i=1時(shí)，傳回資料1；i=2時(shí)，傳回資料2；依此類推，當(dāng)i=n時(shí)，傳回資料n。3.當(dāng)i的整數(shù)值小於1或大於n時(shí)，傳回空字串（null，無內(nèi)容）。4.參數(shù)中的各項(xiàng)資料可以是不同型態(tài)的資料?！纠?】將上一節(jié)的例1改用Choose函數(shù)處理c=InputBox("請輸入代號(1~3)")Ifc<1Orc>=4ThenPrint"代號錯(cuò)誤!"_ElsePrintChoose(c,"剪刀","石頭","布")【例2】輸1~7的數(shù)字，並輸出對應(yīng)的星期一、星期二、…、星期日的英文字。（如輸入1，就輸出Monday；輸入6，就輸出Saturday）d=InputBox(“請輸入1~7的數(shù)字”)Ifd<1Ord>=8ThenPrint(“輸入數(shù)字超出範(fàn)圍”)_ElsePrintChoose(d,"Monday","Tuesday","Wednesday","Thursday","Friday",_"Saturday","Sunday")7-9Switch函數(shù)格式：Switch(運(yùn)算式1,資料1[,運(yùn)算式2,資料2,…[,運(yùn)算式n,資料n]])

【功能】依序判斷運(yùn)算式是否成立（True），成立就傳回其後一個(gè)參數(shù)的資料?！菊f明】1.先判斷運(yùn)算式1是否成立，成立就傳回資料1

（不再判斷後面的運(yùn)算式），不成立則繼續(xù)判斷運(yùn)算式2，其後依此類推。2.如果所有運(yùn)算式都不成立，則傳回空字串（null，無內(nèi)容）。3.參數(shù)中的各項(xiàng)資料可以是不同型態(tài)的資料。

【例1】輸入分?jǐn)?shù)，並輸出「及格，恭喜！」或「不及格，請多用功！」s=InputBox("請輸入分?jǐn)?shù)")PrintSwitch(s>=60,"及格，恭喜！",_s<60,“不及格，請多用功！”)【例2】將成績分三段s=InputBox("請輸入成績")PrintSwitch(s<60,"不及格,請多用功！",_s>=60Ands<90,"及格,恭喜！",_s>=90,“優(yōu)等,發(fā)獎(jiǎng)狀一張！”)【討論】如果分?jǐn)?shù)超出0~100的範(fàn)圍時(shí)，要輸出「分?jǐn)?shù)超出0~100的範(fàn)圍」，要如何修改？7-10MsgBox敘述與函數(shù)

敘述：

MsgBox訊息[,[格式碼][,標(biāo)題]]

函數(shù)：

MsgBox(訊息[,[格式碼][,標(biāo)題]])1.兩者的用法一樣，只不過在函數(shù)中，參數(shù)列的前後要加上小括弧，而且會傳回值（可測知使用者按了那個(gè)鈕），使用敘述時(shí)不會傳回值。2.訊息：要提醒使用者注意的文字，如：「密碼錯(cuò)誤!」。3.標(biāo)題：要出現(xiàn)在對話方塊標(biāo)題欄上的文字，若省略此參數(shù)，會以專案名稱為標(biāo)題。4.格式碼：用來設(shè)定在方塊內(nèi)要出現(xiàn)的圖示與按鈕，可用「代碼」或「常數(shù)變數(shù)」表示，其對照關(guān)係如表8-2。（若省略此參數(shù)，會自動(dòng)設(shè)定為0）5.利用MsgBox函數(shù)出現(xiàn)對話方塊後，使用者按下方塊中的命令鈕時(shí)，會傳回一個(gè)數(shù)值（參看表8-3）供程式辨認(rèn)，作為執(zhí)行後續(xù)敘述的依據(jù)。

表8-2MsgBox常用的基本格式碼及其作用對照表

類別代碼常數(shù)變數(shù)作

用命令鈕0vbOKOnly只顯示

確定

命令鈕1vbOKCancel顯示

確定

與

取消

兩個(gè)命令鈕2vbAbortRetryIgnore顯示異常終止(A)、重試(R)與略過(I)三個(gè)命令鈕3vbYesNoCancel顯示是(Y)、否(N)與取消

三個(gè)命令鈕4vbYesNo顯示是(Y)、否(N)兩個(gè)命令鈕5vbRetryCancel顯示重試(R)與

取消

兩個(gè)命令鈕圖示16vbCritical顯示「重要訊息」圖示32vbQuestion顯示「警告查詢」圖示48vbExclamation顯示「警告訊息」圖示64vbInformation顯示「資訊訊息」圖示表8-2MsgBox常用的基本格式碼及其作用對照表

類別代碼常數(shù)變數(shù)作

用命令鈕0vbOKOnly只顯示

確定

命令鈕1vbOKCancel顯示

確定

與

取消

兩個(gè)命令鈕2vbAbortRetryIgnore顯示異常終止(A)、重試(R)與略過(I)三個(gè)命令鈕3vbYesNoCancel顯示是(Y)、否(N)與取消

三個(gè)命令鈕4vbYesNo顯示是(Y)、否(N)兩個(gè)命令鈕5vbRetryCancel顯示重試(R)與

取消

兩個(gè)命令鈕圖示16vbCritical顯示「重要訊息」圖示32vbQuestion顯示「警告查詢」圖示48vbExclamation顯示「警告訊息」圖示64vbInformation顯示「資訊訊息」圖示表8-2MsgBox常用的基本格式碼及其作用對照表

類別代碼常數(shù)變數(shù)作

用命令鈕0vbOKOnly只顯示

確定

命令鈕1vbOKCancel顯示

確定

與

取消

兩個(gè)命令鈕2vbAbortRetryIgnore顯示異常終止(A)、重試(R)與略過(I)三個(gè)命令鈕3vbYesNoCancel顯示是(Y)、否(N)與取消

三個(gè)命令鈕4vbYesNo顯示是(Y)、否(N)兩個(gè)命令鈕5vbRetryCancel顯示重試(R)與

取消

兩個(gè)命令鈕圖示16vbCritical顯示「重要訊息」圖示32vbQuestion顯示「警告查詢」圖示48vbExclamation顯示「警告訊息」圖示64vbInformation顯示「資訊訊息」圖示表7-2MsgBox函數(shù)傳回值與按下的命令鈕對照表傳回值對應(yīng)的常數(shù)變數(shù)按下的命令鈕1vbOK

確定

2VbCancel

取消

3VbAbort異常終止(A)4VbRetry重試(R)5VbIgnore略過(I)6VbYes是(Y)7VbNo否(N)

使用代碼使用常數(shù)變數(shù)作用35(=3+32+0+0)vbYesNoCancel+vbQuestion顯示是(Y)、否(N)與取消三個(gè)命令鈕及圖示，並設(shè)定第一個(gè)按鈕是(Y)為預(yù)設(shè)按鈕273(=1+16+256+0)vbOKCancel+vbCritical

+vbDefaultButton2顯示確定與取消兩個(gè)命令鈕及圖示，並設(shè)定第二個(gè)按鈕取消為預(yù)設(shè)按鈕格式碼的用法【例1】密碼（Password）檢查：假設(shè)密碼為“1234”，輸入密碼正確就輸出「通過密碼檢查了!」，不正確則輸出「密碼錯(cuò)誤!」。01PrivateSubForm_Activate()02password=InputBox$("請輸入密碼","密碼檢查")03Ifpassword="1234"Then04MsgBox"通過密碼檢查了!",vbOKOnly+vbExclamation,"恭喜!"05Else06feedback=MsgBox("密碼錯(cuò)誤!",vbYesNoCancel+vbCritical,"抱歉!")07SelectCasefeedback08CasevbYes09MsgBox"你按了「是(Y)」鈕",0,"是"10CasevbNoMsgBox"你按了「否(N)」鈕",0,"否“12CasevbCancel13MsgBox"你按了「取消」鈕",0,"取消"14CaseElse15MsgBox"不應(yīng)有此情況"16EndSelect17EndIf18EndSub【執(zhí)行情況】第一次執(zhí)行：

第二次執(zhí)行

1.輸入2.按此鈕3.按此鈕1.輸入3.按此鈕4.按此鈕2.按此鈕7-11應(yīng)用實(shí)例【實(shí)例一】假設(shè)某出版社圖書售價(jià)依採購數(shù)量而分成下面三種情況：1~9本 照定價(jià)出售10~49本 照定價(jià)