[工學(xué)]b學(xué)習(xí)教程第四章-資料下載頁
2025-10-09 23:33本頁面
【正文】 一個表達(dá)式的不同取值情況作不同處理時 ，用 ElseIf語句程序結(jié)構(gòu)顯得較為雜亂 ， 而用 Select Case語句將使程序的結(jié)構(gòu)更清晰 ， Select Case語句又稱為情況語句 。 格式： Select Case 測試表達(dá)式 Case 表達(dá)式列表 1 語句塊 1 Case 表達(dá)式列表 2 語句塊 2 … Case 表達(dá)式列表 n 語句塊 n [Case Else 語句塊 n+1] End Select 功能：根據(jù)“測試表達(dá)式”的值，選擇第一個符合條件的語句塊執(zhí)行。 Select Case語句的執(zhí)行過程是：先求“測試表達(dá)式”的值，然后順序測試該值符合哪一個 Case子句中情況，如果找到了，則執(zhí)行該 Case子句下面的語句塊，然后執(zhí)行 End Select下面的語句；如果沒找到，則執(zhí)行 Case Else下面的語句塊，然后執(zhí)行 End Select下面的語句。 說明： ? “測試表達(dá)式”可以是數(shù)值型或字符串型表達(dá)式； ? “表達(dá)式列表”形式有以下 3種： （ 1）一個表達(dá)式或用逗號隔開的若干表達(dá)式 （ 2） 表達(dá)式 1 To表達(dá)式 2 （ 3） Is 關(guān)系運算符 表達(dá)式 【 例 】 把例 “ 鑒定 ” 按鈕的代碼用 Select Case語句改寫 。 Private Sub Command1_Click（ ） Dim score! score = Select Case score Case Is = 90 = 優(yōu)秀 Case Is = 80 = 良好 Case Is = 70 = 中 Case Is = 60 = 及格 Case Else = 不及格 End Select End Sub
教學(xué)課件相關(guān)推薦
鄂ICP備17016276號-1