VB程序設(shè)計(jì)教案.doc

1、VB程序設(shè)計(jì)選擇結(jié)構(gòu)教學(xué)目標(biāo)1.知識與技能1.了解選擇結(jié)構(gòu)的基本概念。2.了解關(guān)系表達(dá)式與邏輯表達(dá)式的概念。3.能利用VB中的條件語句實(shí)現(xiàn)簡單的選擇結(jié)構(gòu)。2.過程與方法經(jīng)歷實(shí)踐、分析、歸納，掌握IF語句的格式和功能。3.情感態(tài)度與價(jià)值觀運(yùn)用捉老鼠游戲，完善程序，發(fā)展學(xué)生思維的邏輯性及嚴(yán)謹(jǐn)?shù)膶W(xué)習(xí)態(tài)度。4.行為與創(chuàng)新培養(yǎng)學(xué)生利用計(jì)算機(jī)的反饋?zhàn)饔眠M(jìn)行探究學(xué)習(xí)的能力。課時(shí)安排安排2課時(shí)。教學(xué)重點(diǎn)與難點(diǎn)1.教學(xué)重點(diǎn)讓學(xué)生學(xué)會使用VB語言的If分支語句，掌握分支判斷程序結(jié)構(gòu)，來解決實(shí)際問題，并且培養(yǎng)學(xué)生的探索、創(chuàng)新能力。2.教學(xué)難點(diǎn)對解決問題的方法和步驟的理解，并能根據(jù)實(shí)際問題寫出程序代碼。教學(xué)方法與手段

2、講述與討論、實(shí)驗(yàn)與驗(yàn)證。課前準(zhǔn)備教學(xué)課件、實(shí)例程序教學(xué)過程教學(xué)環(huán) 節(jié)教師與學(xué)生活動設(shè)計(jì)意圖設(shè)計(jì)情境、引入新課教師活動：讓學(xué)生制作捉老鼠游戲?qū)W生活動：積極參與。教師活動：學(xué)生制作小游戲界面，教師指導(dǎo)，如果抓到小老鼠系統(tǒng)將會提示抓住老鼠了。一只小老鼠在草地上跑來跑去，現(xiàn)在要用鼠標(biāo)控制敲鐘它。敲中一次，就會彈出一次信息框。我們將通過制作這個(gè)小游戲程序，學(xué)習(xí)程序設(shè)計(jì)語言IF條件判斷語句。由鼠標(biāo)抓小老鼠同學(xué)們的不同選擇引出本課的主題選擇結(jié)構(gòu)。通過制作小游戲使激發(fā)學(xué)生的思維能力，并引出本課的內(nèi)容選擇結(jié)構(gòu)課堂小結(jié)小結(jié)總結(jié)本堂課的內(nèi)容。拓展活動編寫“小游戲”界面。培養(yǎng)學(xué)生的探索、創(chuàng)新能力。培養(yǎng)學(xué)生的創(chuàng)新，探索

3、能力VB程序設(shè)計(jì)選擇結(jié)構(gòu)教學(xué)目標(biāo)1.知識與技能1.了解選擇結(jié)構(gòu)的基本概念。2.了解關(guān)系表達(dá)式與邏輯表達(dá)式的概念。3.能利用VB中的條件語句實(shí)現(xiàn)簡單的選擇結(jié)構(gòu)。2.過程與方法經(jīng)歷實(shí)踐、分析、歸納，掌握IF語句的格式和功能。3.情感態(tài)度與價(jià)值觀運(yùn)用捉老鼠游戲，完善程序，發(fā)展學(xué)生思維的邏輯性及嚴(yán)謹(jǐn)?shù)膶W(xué)習(xí)態(tài)度。4.行為與創(chuàng)新培養(yǎng)學(xué)生利用計(jì)算機(jī)的反饋?zhàn)饔眠M(jìn)行探究學(xué)習(xí)的能力。課時(shí)安排安排2課時(shí)。教學(xué)重點(diǎn)與難點(diǎn)1.教學(xué)重點(diǎn)讓學(xué)生學(xué)會使用VB語言的If分支語句，掌握分支判斷程序結(jié)構(gòu)，來解決實(shí)際問題，并且培養(yǎng)學(xué)生的探索、創(chuàng)新能力。2.教學(xué)難點(diǎn)對解決問題的方法和步驟的理解，并能根據(jù)實(shí)際問題寫出程序代碼。教學(xué)方法與

4、手段講述與討論、實(shí)驗(yàn)與驗(yàn)證。課前準(zhǔn)備教學(xué)課件、實(shí)例程序教學(xué)過程教學(xué)環(huán) 節(jié)教師與學(xué)生活動設(shè)計(jì)意圖設(shè)計(jì)情境、引入新課新授教師活動：讓學(xué)生制作捉老鼠游戲?qū)W生活動：積極參與。教師活動：學(xué)生制作小游戲界面，教師指導(dǎo)，如果抓到小老鼠系統(tǒng)將會提示抓住老鼠了。一只小老鼠在草地上跑來跑去，現(xiàn)在要用鼠標(biāo)控制敲鐘它。敲中一次，就會彈出一次信息框。我們將通過制作這個(gè)小游戲程序，學(xué)習(xí)程序設(shè)計(jì)語言IF條件判斷語句。由鼠標(biāo)抓小老鼠同學(xué)們的不同選擇引出本課的主題選擇結(jié)構(gòu)。通過控件屬性學(xué)生掌握本課界面設(shè)計(jì)由小游戲?qū)嵗鲞x擇結(jié)構(gòu)的一般流程圖，講解選擇結(jié)構(gòu)與條件語句選擇結(jié)構(gòu)選擇結(jié)構(gòu)流程圖新授教師活動：Timer事件Private

5、 Sub Timer1_Timer()Randomize 隨機(jī)化生成器X = Int(Rnd * 7000) X值為隨機(jī)整數(shù),范圍在0-7000Y = Int(Rnd * 4000) Y值為隨機(jī)整數(shù),范圍在0-4000Image1.Left = X Image1的左邊界坐標(biāo)為XImage1.Top = Y Image1的上邊界坐標(biāo)為YEnd Sub通過制作小游戲使激發(fā)學(xué)生的思維能力，并引出本課的內(nèi)容選擇結(jié)構(gòu)學(xué)生通過教師講解，理解控件屬性新授當(dāng)定時(shí)器開始工作時(shí)，每到Interval設(shè)定的時(shí)間，即執(zhí)行一次代碼。即產(chǎn)生X和Y兩個(gè)隨機(jī)數(shù)，每一次時(shí)間間隔產(chǎn)生的隨機(jī)數(shù)是不一樣的。 再將隨機(jī)數(shù)賦予圖片的左坐

6、標(biāo)和頂坐標(biāo)。由此面產(chǎn)生的效果是：每到一定時(shí)間，老鼠圖片的所在位置就隨機(jī)發(fā)生變化。學(xué)生通過老師講解，理解選擇結(jié)構(gòu)并掌握選擇結(jié)構(gòu)的基本格式。新授2.停止按鈕點(diǎn)擊事件Private Sub Command2_Click()If Timer1.Enabled = True Then Timer1.Enabled = FalseEnd Sub通過程序?qū)W生理解IF語句。新授3.退出按鈕點(diǎn)擊事件Private Sub Command3_Click()If Timer1.Enabled = True Then 如果定時(shí)器仍在工作MsgBox 請先停止程序 彈出消息框警告Else 否則如果定時(shí)器已停止End 則

7、退出程序End IfEnd Sub新授4.開始按鈕點(diǎn)擊事件Private Sub Command1_Click()Timer1.Enabled = True 定時(shí)器開始工作If Combo1.Text = 初級水平 Then 當(dāng)為初級水平時(shí)Timer1.Interval = 600 時(shí)間間隔為600毫秒ElseIf Combo1.Text = 中級水平 Then 當(dāng)為中級水平時(shí)Timer1.Interval = 400 時(shí)間間隔為400毫秒ElseIf Combo1.Text = 高級水平 Then 當(dāng)為高級水平時(shí)Timer1.Interval = 200 時(shí)間間隔為200毫秒End IfEn

8、d SubIF語句的第三種結(jié)構(gòu)多重分支結(jié)構(gòu)，其格式為：If ThenIf Then.ELSE If ThenEnd If5.擊中老鼠事件當(dāng)鼠標(biāo)點(diǎn)中老鼠圖像時(shí)，程序會彈出一個(gè)消息框，顯示擊中的信息。Private Sub Image2_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)MsgBox 抓住老鼠了！ 彈出消息框End Sub培養(yǎng)學(xué)生閱讀程序的能力，測驗(yàn)學(xué)生對選擇結(jié)構(gòu)的理解程度。學(xué)生練習(xí)1.電梯的最大容量為12人，在此范圍內(nèi)電梯能正常運(yùn)行，超出了這個(gè)范圍電梯將發(fā)出警報(bào)。（C）Dim a as

9、integera=val(inputbox(“請輸入進(jìn)入電梯的人數(shù)”). a=12print “正常運(yùn)行”print “發(fā)出警報(bào)”A.ifthenend ifelseB.thenifelseend ifC.ifthenelseend ifD.ifelsethenend if2.以下程序段運(yùn)行后，分別輸入5和6，則輸出字符的排列順序是（ B ）I=val(inputbox(“請輸入I的值”)If I 6 then Print “#” ；Else Print “*”End ifA.*# B.#* C.# D.*3語句If x=1 Then y=1,下列說法正確的是（C ）。A、x=1和 y=1 均為賦值語句B、x=1和 y=1均為關(guān)系表達(dá)式C、x=