選擇結(jié)構(gòu)程序設計(2)(存儲版)
【正文】 1． Interval屬性 Interval屬性返回或設置計時器控件的 Timer事件響應所需間隔的毫秒數(shù)。同時檢測系統(tǒng)時間是否為整點，如是整點，則發(fā)出提示聲音和整點報時信息。 Hour(Time) amp。刷新時間 End Sub 在計時器 Timer1的 Timer的事件代碼如下： Private Sub Timer1_Timer() = Time If Minute(Time) = 0 And Second(Time) = 0 Then Beep 39。 55 【 例 4． 9】 利用計時器控件制作一個電子時鐘，并實現(xiàn)整點報時。它的大小不可改變，也沒有 Width和Height屬性。 設計步驟： 建立用戶界面并設置相應的屬性： 在窗體上添加一個標簽控件 Label1， Caption屬性設置為： Visual Basic程序設計。 0：未被選擇，圖示為，默認值。 ③、 Caption屬性 設置單選按鈕的文本注釋內(nèi)容，即單選按鈕邊上的的文本標題。 單選按鈕必須成組出現(xiàn)，通常將兩個或兩個以上的單選控件放在一個 Frame控件（框架）中，形成一個選項組 在選項組中使用單選按鈕，用戶只能選擇其中的一項，當其中的一項被選中（即圖示為，也稱為打開狀態(tài)），其他選擇按鈕都被置于關(guān)閉狀態(tài)（即圖示為）。其它情況 r = 10 39。編程計算優(yōu)惠后的單價和總金額。 選擇結(jié)構(gòu)的嵌套既可以是同一種結(jié)構(gòu)的嵌套，也可以是不同結(jié)構(gòu)之間的嵌套。 28 其流程見圖： 29 （ 3）說明 ① 表達式列表 i是由逗號分隔開的下列 3種成分組成： ? 表達式； ? 表達式 1 To 表達式 2； ? Is關(guān)系表達式 ② 表達式列表 1到表達式列表 n的值與測試表達式的值的類型必須相同。因此，要注意對多分支的條件的書寫次序，防止某些值被過濾。 ⑶說明 : ? 條件一般為關(guān)系表達式和邏輯表達式。 16 ⑴ 格式： If…Then…Else 語句屬于雙分支結(jié)構(gòu)語句，書寫格式也有兩種：單行結(jié)構(gòu)和塊結(jié)構(gòu)。其流程圖為 ： 語句組 A B 條件 不成立 成立 14 例如： If x0 Then x=x+1 或： If x0 Then X=x+1 End If 表示如果 x0，則將 x的值增加 1，否則執(zhí)行該語句的下一條語句。 表 4–3 邏輯運算真值表 A B Not A 非 And 與 Or 或 Xor 異或 Eqv 相等 Imp 蘊含 T T F T T F T T T F F F T T F F F T T F T T F T F F T F F F T T 9 ⑵ 邏輯表達式 用邏輯運算符連接起來的表達式稱為邏輯表達式，邏輯表達式也稱為布爾表達式。 例如： ” “ ‖0‖ 結(jié)果為 False ‖a‖‖人” 結(jié)果為 True ―你們” ‖我們” 結(jié)果為 False 6 [4]、如果兩個操作數(shù)是日期型，則將日期型數(shù)據(jù)視為形如“ yyyymmdd‖的 8位整數(shù)，按數(shù)值大小比較。條件表達式的結(jié)果只能是“ TRUE‖ 或“ FALSE‖。同樣，在程序設計過程中，也常常要根據(jù)不同的條件，采用不同的操作。其運算結(jié)果是一個邏輯值，即真（ True）或假（ False）。格式為： 表達式 1 關(guān)系運算符 表達式 2 在關(guān)系表達式中，如果出現(xiàn)函數(shù)和算術(shù)運算表達式，先計算函數(shù)和算術(shù)運算表達式，然后再計算關(guān)系運算。 例如：計算邏輯表達式 sqr(4)2 Or Not 8 0 And ( 9 8) / 2 0的值 首先進行函數(shù)運算： sqr(4) 值，結(jié)果為 2 其次算術(shù)運算： (98)/2= 第三進行關(guān)系運算： 22 結(jié)果為 False 80 結(jié)果為 True 0結(jié)果為 False 最后進行邏輯運算： False or not True and False 按照邏輯運算符的優(yōu)先級，先計算 Not 運算，再計算 and運算 ,最后計算 or運算 ,結(jié)果為 False 11 條件語句 條件語句是形成選擇結(jié)構(gòu)最基本的語句之一，其形式有三種： ? If?Then 語句 ? If?Then?Else 語句 ? IIF函數(shù) 12 If…Then 語句 ⑴ 、格式： If…Then 語句屬于單分支結(jié)構(gòu)語句，書寫格式有兩種：單行結(jié)構(gòu)和塊結(jié)構(gòu)。 15 If…Then…Else 語句 ⑴ 格式： If…Then…Else 語句屬于雙分支結(jié)構(gòu)語句，書寫格式也有兩種：單行結(jié)構(gòu)和塊結(jié)構(gòu)。如果 Else 語句組 2部分省略，則形成單向分支。 20 例如，求 x， y中大的數(shù)，賦值給 Max變量，語句如下： Max=Iif(xy,x,y) 判斷一個整數(shù)是奇數(shù)還是偶數(shù)，語句如下： Print Iif(x mod 2=0,‖ 偶數(shù)” ,‖奇數(shù)” ) 21 多分支語句 雙分支結(jié)構(gòu)只能根據(jù)條件的 True和 False決定處理兩個分支中的其中一個。 Private Sub Form_Click() Dim Score As Integer Score = InputBox(請輸入學生的百分制分數(shù) ) If Score = 90 Then MsgBox 學生的成績?yōu)?A等 ElseIf Score = 80 Then MsgBox 學生的成績?yōu)?B等 ElseIf Score = 70 Then MsgBox 學生的成績?yōu)?C等 ElseIf Score = 60 Then MsgBox 學生的成績?yōu)?D等 Else MsgBox 學生的成績?yōu)?E等 End If End Sub 26 Select Case語句 Select Case語句（又稱為情況語句）。 30 【 例 】 某商店進行購物打折優(yōu)惠活動促銷，根據(jù)每位顧客一次性購物的消費額給予不同的折扣，具體方法如下： (1)購物 1500元以上的九五折優(yōu)惠， (2)購物 2022元以上的九折優(yōu)惠， (3) 購物 2500元以上的八五折優(yōu)惠， (4) 購物 4000元以上的八折優(yōu)惠。 語句如下： If x0 Then
教學課件相關(guān)推薦
鄂ICP備17016276號-1