【文章內(nèi)容簡介】 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。 2. 資料 1與 資料 2都可配用 數(shù)值 、 字串 或 運(yùn)算式 。 【例 1】假 如購書十本以上，就打八折，否則不打折，計(jì)算並輸出購書金額。 Print 購書金額 =。IIf(qty=10,price*qty*,price*qty)。 元 【例 2】根據(jù)分?jǐn)?shù)（ score），印出「及格 ,恭喜！」或「不及格 , 請多用功！」 Print IIf(score=60,及格 ,恭喜！ ,不及格 ,請多用功！ ) Select Case 運(yùn)算式 Case 測試資料 1 敘述區(qū)段 1 Case 測試資料 2 敘述區(qū)段 2 … Case 測試資料 n 敘述區(qū)段 n [CaseElse 敘述區(qū)段 ] End Select 77 Select Case敘述 如果末加列 Case Else，而所有 Case後的測試資料都不符合時(shí)，將會(huì)順著離開 Select結(jié)構(gòu)，而執(zhí)行 End Select下面的敘述。 【例 1】 Select Case的應(yīng)用 01 c = InputBox(請輸入代號 1~3) 02 Select Case c 03 Case 1 04 Print 剪刀 05 Case 2 06 Print 石頭 07 Case 3 08 Print 布 09 Case Else 10 Print 代號錯(cuò)誤 ! 11 End Select Case測試資料的用法 一、 使用單一或多個(gè)常數(shù) ：如果運(yùn)算式的結(jié)果值等於其中一 個(gè)常數(shù)，就算符合該 Case的 條件。如下： Case 1 Case SUN Case 1,2,3,4 Case 2,4,8,16,32,64 Case MON,TUE,WED,THU,FRI Case 臺北 ,臺中 ,高雄 二、 利用常數(shù)指定範(fàn)圍 ：如果運(yùn)算式的結(jié)果值在範(fàn)圍之內(nèi)，就算符合該 Case的條 件。如下： Case 1 To 4 運(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的條件。如下： Case Is =60 運(yùn)算式的結(jié)果值 ≧ 60就符合條件 Case Is SUN 運(yùn)算式的結(jié)果值 ≠ SUN 就符合條件 Case Is = Y 運(yùn)算式的結(jié)果值為 Y就符合條件 四、 將前述三種用法混合使用 。如下： Case 10 To 20,30,Is60 運(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】輸入成績，再輸出如 75節(jié)例 4 的文字。 01 Select Case score 02 Case Is 60 03 Print 不及格 04 Print 請多用功！ 05 Case 60 To 89 06 Print 及格 07 Print 恭喜！ 08 Case Else 09 Print 優(yōu)等 10 Print 發(fā)獎(jiǎng)狀一張！ 11 End Select 【討論】此程式的考慮比較單純，如果分?jǐn)?shù)為負(fù)值或高於100分，會(huì)怎樣？應(yīng)該如何修改程式，才會(huì)比較周全？ 78 Choose函數(shù) 格式： Choose(i,資料 1[,資料 2,…[, 資料 n]]) 【 功能 】依 i的整數(shù)值，傳回其後面參數(shù)中對應(yīng)的資料項(xiàng) 【 說明 】 i值不是整數(shù)時(shí)，會(huì)捨去其小數(shù)部分。 i=1時(shí)，傳回 資料 1； i=2時(shí)，傳回 資料 2；依此類推， 當(dāng) i= n時(shí)，傳回 資料 n。 i的整數(shù)值小於 1或大於 n時(shí)，傳回 空字串 （ null，無內(nèi)容）。 中的各項(xiàng)資料可以是不同型態(tài)的資料。 【例 1】將上一節(jié)的例 1改用 Choose函數(shù)處理 c = InputBox(請輸入代號 (1~3)) If c 1 Or c = 4 Then Print 代號錯(cuò)誤 ! _ Else Print Choose(c, 剪刀 ,石頭 , 布 ) 【例 2】輸 1~7的數(shù)字，並輸出對應(yīng)的星期一、星期二、 … 、星期日的英文字。（如輸入 1，就輸出Monday；輸入 6，就輸出 Saturday） d = InputBox(“請輸入 1~7的數(shù)字” ) If d 1 Or d = 8 Then Print (“輸入數(shù)字超出範(fàn)圍” ) _ Else Print Choose(d, Monday, Tuesday, Wednesday, Thursday, Friday, _ Saturday, Sunday) 79 Switch函數(shù) 格式 ： Switch(運(yùn)算式 1,資料 1[,運(yùn)算式 2,資料 2,…[, 運(yùn)算式 n,資料 n]]) 【功能】依序判斷 運(yùn)算式 是否成立（ True），成立就傳回其後一個(gè)參數(shù)的資料。 【說明】 運(yùn)算式 1是否成立，成立就傳回 資料 1 （不再判斷後面的運(yùn)算式），不成立則繼續(xù)判斷 運(yùn)算式 2，其後依此類推。 運(yùn)算式 都不成立，則傳回 空字串 （ null，無內(nèi)容）。 中的各項(xiàng)資料可以是不同型態(tài)的資料。 【例 1】輸入分?jǐn)?shù)，並輸出「及格，恭喜！」或「不及格， 請多用功！」 s= InputBox(請輸入分?jǐn)?shù) ) Print Switch(s=60, 及格，恭喜！ , _