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