【正文】 敘述區(qū)段 1 Else 敘述區(qū)段 2 End If 【 說明 】 假如在 Then或 Else下面的敘述區(qū)段中，再使用 If敘述，則 稱為 巢式 If敘述 (Nested If Statement) ，如下： IF條件式 1 Then ： IF 條件式 2 Then 敘述區(qū)段 A Else 敘述區(qū)段 B End If ： Else ： IF 條件式 3 Then 敘述區(qū)段 C Else 敘述區(qū)段 D End If ： End If 【例 3】 根據(jù)分數(shù)（ s），印出「及格」「恭喜」或 「不及格」「請多用功！」 If s60 Then Print 不及格 Print 請多用功！ Else Print 及格 Print 恭喜！ End If 【例 4】 巢式 If敘述的應(yīng)用：根據(jù)分數(shù)的範圍，輸出文字如下： 60 「不及格」「請多用功！」 60~89 「及格」「恭喜！」 =90 「優(yōu)等」「發(fā)獎狀一張！」 If s60 Then Print 不及格 Print 請多用功！ Else If s90 Then Print 及格 Print 恭喜！ Else Print 優(yōu)等 Print 發(fā)獎狀一張！ End If End If IF 條件式 1 Then 敘述區(qū)段 1 [ElseIf 條件式 m Then 敘述區(qū)段 m ： ： ] Else 敘述區(qū)段 n End If 格式三 : 最後用 Else，安排上述條件都不符合時要執(zhí)行的工作 【 例 5】 將例 4改用格式三 If score60 Then Print 不及格 Print 請多用功！ ElseIf score90 Then Print 及格 Print 恭喜！ Else Print 優(yōu)等 Print 發(fā)獎狀一張！ End If c=InputBox$(請輸入一個字元 ) If c=A And c=Z Then Print 大寫字母 ElseIf c=a And c=z Then Print 小寫字母 ElseIf c=0 And c=9 Then Print 數(shù)字 Else Print 不是字母或數(shù)字 End If 【例 6】判斷輸入的字元是大寫字母、小寫字母、數(shù)字或都不是 76 IIf函數(shù) 格式 ： IIf(條件式 ,資料 1,資料 2) 1. 如果條件式成立（結(jié)果為 True），就傳回資料 1，不成立（結(jié)果為 False）則傳回資料 2。 money。 格式一： If 條件式 Then 敘述 如果 If後面的條件式成立了，就接著執(zhí)行 Then後面的敘述，完成後再執(zhí)行下一列的敘述；如果條件未成立，則直接執(zhí)行下一列的敘述。此結(jié)構(gòu)常用的有下列三種型式： (將在第九章介紹 ) l. ForNext結(jié)構(gòu) 【例 5】輸出 5 For i=1 To 5 Step 2 Print i Next i 意義 ： For與 Next之間 形成一個迴圈，其中 的敘述 Print i，依 i= 5共執(zhí)行三次，即印出 3及 5。（可利用 Word軟體中的【 插入 /圖片 /快取圖案 /流程圖 】來製作 流程圖 ） 73 程式的基本結(jié)構(gòu) 一、 循序結(jié)構(gòu) ： 指多個敘述依序執(zhí)行的方式。 流程圖 是畫來給人看的，可作為自己或別人瞭解程式做法及處理步驟的一種參考文件。 【例 3】：輸入 n值 輸入或輸出符號 【例 4】：輸出 n值 a=b+c 輸入 n 輸出 n 4. 流向符號 ：表示程式進行的方向。 72 流程圖的意義 流程圖 是利用簡明、標準的圖形及線條，來描述程式的處理步驟。 二、 設(shè)計解題程序 ：研究分析解題方法，構(gòu)思有效可行的處理程序，可以用 流程圖 (Flow Chart) 來表達所要處理的步驟。 三、 編寫程式 ：依 程式語言 的語法規(guī)則，將解題的程序 轉(zhuǎn)寫成 程式 。 常用的 流程圖 有下列六種： 1. 開始或結(jié)束符號 （ 起訖符號 ） ：表示流程 圖的起點或終點，一個流程圖必須有起點 及終點，而且只能有一個起點，但可以有 一個以上的終點。 表示有一個條件要判斷，並根據(jù)其結(jié)果決定下一個執(zhí)行步驟。初學(xué)程式語言的人，在設(shè)計程式之前，最好先利用 流程圖 來規(guī)劃整個程式結(jié)構(gòu)，訓(xùn)練處理問題的邏輯思路，對於程式邏輯比較容易融會貫通。 【例 1】 循序結(jié)構(gòu) x=Inputbox(請輸入第一個數(shù) ) y= Inputbox(請輸入第二個數(shù) ) s=x+y Print 兩數(shù)的和 =。 (此例之條件為 i由 1到 5，每次增加 2) 2. DoWhile結(jié)構(gòu) 【例 6】輸出 5 i=1 Do While i=5 Print i i=i+2 Loop 意義 ： 以 i=5為條件式 ，如果條件成立， 就重覆執(zhí)行 Do與 Loop之間的敘述。 【例 1】求某一數(shù)值變數(shù) a 的絕對值。 元 8 End Sub 【執(zhí)行情況】 第一次執(zhí)行 ： 第二次執(zhí)行 ： 【例 3】 輸入 1~3的代號，再輸出對應(yīng)的 剪刀、石頭、布 ） 1 Private Sub Form_Activate() 2 Dim c As Stri