IF多分支結(jié)構(gòu)教案.doc

IF多分支結(jié)構(gòu)教案教學(xué)對象高一年級的學(xué)生課題IF多分支結(jié)構(gòu) 教學(xué)目標(biāo)知識目標(biāo)1、 識記if多分支結(jié)構(gòu)的語法格式2、 能夠讀懂理解多分支結(jié)構(gòu)程序（command控件的新屬性：style屬性和backcolor屬性) (消息框函數(shù)MsgBox) 能力目標(biāo)1、 根據(jù)學(xué)生的實(shí)際能力，通過閱讀程序，學(xué)會模仿2、 有效、合乎規(guī)范的使用多分支結(jié)構(gòu)解決編程中的實(shí)際問題 情感目標(biāo)1、 真心話大冒險的游戲貼近學(xué)生，程序生動有趣，既能讓學(xué)生學(xué)到程序設(shè)計的方法，又能提高學(xué)生主動編程的積極性2、 在學(xué)習(xí)過程中培養(yǎng)學(xué)生探索求知的精神教學(xué)重點(diǎn)1、 if多分支結(jié)構(gòu)的執(zhí)行過程2、 if多分支結(jié)構(gòu)的語法格式教學(xué)難點(diǎn)利用if多分支來解決實(shí)際問題教學(xué)準(zhǔn)備計算機(jī)、教學(xué)課件棒棒糖教學(xué)環(huán)節(jié)教師活動學(xué)生活動設(shè)計意圖情境導(dǎo)入 與同學(xué)們玩真心話大冒險的游戲，讓學(xué)生們體驗該程序的流程與趣味性，產(chǎn)生興趣，從而提高他們主動學(xué)習(xí)的積極性。 參與游戲通過貼近學(xué)生的游戲來引入今天的課程教學(xué)環(huán)節(jié)教師活動學(xué)生活動設(shè)計意圖學(xué)習(xí)新知學(xué)習(xí)新知一IF多分支語句流程圖的畫法小結(jié)：IF多分支流程圖用菱形符號，在菱形框中設(shè)置條件，依次判斷條件是否成立，當(dāng)滿足某個條件時，執(zhí)行相應(yīng)的語句，其余分支不再執(zhí)行；若條件都不滿足，就什么都不執(zhí)行。二、If多分支結(jié)構(gòu)語句的格式 if Then ElseIf Then ElseIf Then Else 語句塊 n+1 End If小結(jié)1、不管有幾個分支，依次判斷，當(dāng)某條件滿足，執(zhí)行相應(yīng)的語句，其余分支不再執(zhí)行；若條件都不滿足，且有Else子句，則執(zhí)行該語句塊，否則什么也不執(zhí)行。 2、ElseIf不能寫成 Else If。3、只有最后一個End If。4、else部分可以省略。三、真心話大冒險程序的設(shè)計1、整體界面設(shè)計對象有按鈕和時間控件。2、 程序剛開始的時候，9個真心話大冒險的按鈕是不能按的，于是將這九個按鈕的enabled 屬性設(shè)置為false,style屬性設(shè)置為1-Graphical。介紹按鈕的style屬性。3、 timer控件用來實(shí)現(xiàn)開始挑戰(zhàn)之后顯示的紅色閃爍。按鈕變紅的順序是1-2-3-6-9-8-7-4-5-1，有九種情況，所以用if多分支結(jié)構(gòu)來實(shí)現(xiàn)。停止之后，該按鈕變紅，上一個按鈕變回原來的顏色，且只有該按鈕能點(diǎn)，其他八個真心話大冒險的按鈕enabled要設(shè)為False，以及講解按鈕的backcolor屬性。關(guān)鍵代碼如下：Private Sub Timer1_Timer()x = x + 1If x = 10 Then x = 1If x = 1 ThenCommand1.BackColor = vbRedCommand5.BackColor = &H8000000FCommand1.Enabled = TrueCommand2.Enabled = FalseCommand3.Enabled = FalseCommand4.Enabled = FalseCommand5.Enabled = FalseCommand6.Enabled = FalseCommand7.Enabled = FalseCommand8.Enabled = FalseCommand9.Enabled = FalseElseIf x = 2 ThenCommand2.BackColor = vbRedCommand1.BackColor = &H8000000FElseIf x = 3 ThenCommand3.BackColor = vbRedCommand2.BackColor = &H8000000FElseIf x = 4 ThenCommand6.BackColor = vbRedCommand3.BackColor = &H8000000FElseIf x = 5 ThenCommand9.BackColor = vbRedCommand6.BackColor = &H8000000FElseIf x = 6 ThenCommand8.BackColor = vbRedCommand9.BackColor = &H8000000FElseIf x = 7 ThenCommand7.BackColor = vbRedCommand8.BackColor = &H8000000FElseIf x = 8 ThenCommand4.BackColor = vbRedCommand7.BackColor = &H8000000FElseIf x = 9 ThenCommand5.BackColor = vbRedCommand4.BackColor = &H8000000FEnd IfEnd Sub4、 停止之后要點(diǎn)擊該真心話大冒險的按鈕，會彈出窗口顯示你的真心話大冒險任務(wù)。講解MsgBox函數(shù)。學(xué)生觀察并記住語句格式聽講記錄，學(xué)會IF多分支語句的寫法小結(jié)if多分支語句的結(jié)構(gòu) 了解if語句流程圖的畫法小結(jié)流程圖的組成了解if語句的結(jié)構(gòu)