[計算機軟件及應用]vb第4章教案(編輯修改稿)

　

【文章內容簡介】 語句塊 2 ElseIf 條件 3 Then 語句塊 3 …… ［ Else 語句塊 n］ End If 先測試條件 1，如果為假，就依次測試條件 2，依此類推，直到找到為真的條件。 一旦找到一個為真的條件時， VB會執行相應的語句塊，然后執行 End If語句后面的代碼。 如果所有條件都是假，那么執行 Else后面的語句塊 n，然后執行 End If If h 12 Then Print 早上好！ ElseIf h 18 Then Print 下午好！ Else Print 晚上好！ End If 2. ElseIf格式 Private Sub Form_Load() Show a = 1: b = 3 If a * 4 1 = b Then If b 5 Then b = b + 1 ElseIf b 2 Then b = b 1 Else b = b + 2 End If b = IIf(a = b, b + 1, b 1) Print b End Sub 下列程序的運行結果是？ 想一想 思考題 2 使用多分支語句 Select Case也可以實現多分支選擇。更有效、更易讀，并且易于跟蹤調試。 Select Case 測試表達式 Case 表達式表 1 語句塊 1 ［ Case 表達式表 2 語句塊 2］ . . . ［ Case Else 語句塊 n End Select 先計算表達式的值，然后將該值依次與結構中的每個 Case的值進行比較，如果該值符合某個 Case指定的值條件時，就執行該Case的語句塊，然后跳到 End Select，從 End Select出口。如果沒有相符合的 Case值，則執行 Case Else中的語句塊。 示例 Select Case x Case 1 y=10 Case 1 y=20 Case Else y=30 End Select 選擇性控件 提供選項讓用戶選擇，如選擇 “ 是 ” 或 “ 否 ” ，從列表中選擇某一 項。 選擇的控件有：單選按鈕、復選框、列表框和組合框。 1. 單選按鈕的用途 單選按鈕 (OptionButton)控件由一個圓圈“○”及緊挨它的文 字組成，能提供“選中”和“未選中”兩種可選項。通常成組形式 出現，且最多必選一項。 2. 常用屬性 Caption屬性 Value屬性：表示單選按鈕是否被選中，選中時 Value值為 True,否則為 False 使用單選按鈕組時，選中其中一個，其余就會自動關閉 Alignment屬性：設置單選按鈕標題的對齊方式 3. 事件 Click事件 在應用程序中可以創建一個事件過程，檢測控件對象 Value 屬性值，再根據檢測結果執行相應的處理 單選按鈕組 Caption屬性 單選按鈕 (1) 創建應用程序的用戶界面和設置對象屬性 單選按鈕組； 初始狀態：設置 Option1的 Value屬性值設置為 True，或通過代碼“ =True‖ 來實現 (2) 編寫程序代碼 功能要求 例 用單選按鈕組控制顯示不同的字體 例 程序代碼如下： Private Sub Option1_Click() = 宋體 End Sub Private Sub Option2_Click() = 幼圓 End Sub Private Sub Option3_Click() = 楷體 _GB2312 End Sub 說明： 程序代碼中所用的字體號 (如“宋體”、“幼圓”等 )必須與系統提供的字體相一致 1. 復選框 (CheckBox) 控件由一個四方形小框和緊挨它的文字組 成。提供 “ 選中 ” 和 “ 未選中 ” 兩種可選項。復選框控件與單選按鈕控 件區別在于：前者可同時選中多個選項。 2. Caption Value屬性：表示復選框的狀態 有三種取值： 0——未選中 (缺省值 ) 1——選中 2——不可用 (