1、新課標青島版初中信息技術八年級下冊VB程序設計單元精品教案第1課大熊貓的兩個愿望教學目標1、認識 VB 界面。2、了解常用控件。3、培養學生學習VB的興趣和勇于探索的精神。教學重點1、掌握Lable控件，CommandButtorf空件的字體、顏色屬性設置。2、啟動VB的方法。3、VB窗口中各部分的作用。教學難點掌握Lable控件，CommandButton空件的字體、顏色屬性設置。學生的學習方式自主學習，合作學習，探究學習教學策略講授法，討論法，任務驅動教學法，基于問題的學習，范例教學法課時安排 1課時教學過程導入：教師運行“大熊貓的兩個愿望”程序，單擊不同的 CommandBotton觀察

2、結果，使學生產生興趣。提示它是由VB 編寫，我們通過學習也能做出來。環節一：認識VB工作界面教師通過類比法引導學生認識工作界面。環節二：打開“大熊貓的兩個愿望.vbp” , 運行程序，總結運行程序的方法。環節三：通過屬性窗口修改按鈕的屬性發問：如何改變按鈕的標題名稱、背景色、字體？讓學生選中CommandBottonl觀察屬性窗口的變化，讓學生討論、試探，總結結論。運用結論，修改CommandBotton2勺屬性值。環節四： 通過代碼修改Label.Captain剛才運行程序時，單擊Command!到了大熊貓的愿望，能否修改這個愿望呢？1、打開代碼窗口的方法：試探打開代碼窗口的方法，討論總結。

3、2、打開Command代碼窗口，進行修改。3、運用結論，修改Command2代碼。學有余力的同學可修改 Label2.ForeColor屬性 值。環節四： 實踐與創新教學小結：掌握Lable控件，CommandButtoifi件的屬性設置。制作簡單程序的過程。教學反思：通過玩游戲認識VB,編寫最簡單的程序來學會編程的步驟，認識窗口，及簡單控件的使用，使學生對編程降低神秘感，產生興趣。第 2 課 自我介紹教學目標1、了解開發程序的一般過程2、掌握把程序生成*.exe 的過程3、學會使用TextBox、 OptionButton 控件；會用代碼設置FontFont.Size ；會用代碼:Optio

4、n1.SetFocus ；學會使用續行符“_”；學會使用字符連接符“+”。4、培養學生自主完成程序設計的興趣。教學重點：1、學會使用textbox 控件、單選按鈕，學會使用代碼設置字體、文字的大小、textbox 控件的 text 值。2、學會編寫單選按鈕、命令按鈕的Click 事件代碼，學會用代碼選中單選按鈕。3、學會使用分行符、字符連接符。教學難點1、學會使用textbox 控件、單選按鈕，學會使用代碼設置字體、文字的大小、textbox 控件的 text 值。2、學會編寫單選按鈕、命令按鈕的Click 事件代碼，學會用代碼選中單選按鈕。3、學會使用分行符、字符連接符4、調試程序，修改程序

5、錯誤。學生的學習方式自主學習，合作學習，探究學習教學策略設置情景 提出問題；師生討論 探究問題；獨立探索，小組合作 解決問題；交流、總結-完成任務、開拓思維一一實踐創新。課時安排2課時教學過程導入： 自我介紹是人際交往中與他人進行溝通，增進了解、建立聯系的方式，這節課我們一起做個“自我介紹”的程序，來介紹自己的愛好、優點和不足。教師把做好的自我介紹程序展示給大家看，提出這節課的學習任務。環節一：分析問題教師引導學生分析界面中用到的4個控件。環節二：界面設計1、構建界面：學生操作，添加控件（可用兩種方法實現）。2、設置對象屬性：根據程序界面，在屬性窗口中設置每個控件的屬性值。采用自主探究和合作學

6、習形式。環節三： 編寫代碼、調試與運行。學生根據課本內容自主學習、討論編寫代碼。教師提示代碼中的字符串的書寫及用法、“ +”號的用法，對學生操作中出現的錯誤進行修改。完成任務的同學輔導其他同學。環節四：保存文件、生成可執行文件。1、學生參考課本操作，讓學生觀察保存 VB文件和使用其他軟件的保存有什么不同。（VB要保存兩個:*.frm 和*.vbp ）。2、生成*.exe 文件后，學生自主學習，并*.exe 的作用。環節五： 總結（學生分組總結，匯總）。1、編寫程序過程中用到的控件的屬性設置及用法2、“+”字符串運算符、分行符的用法，及字符串的定義環節六： 實踐與創新（大顯身手）開發一個程序，名

7、為“我的名片 ”。分組討論，互助合作，完成任務。教學反思這節課通過2課時的時間完成兩個程序。熟悉界面控件以及屬性的設置，編寫事件代碼，調試運行程序，保存文件，生成可執行文件。這是個比第一節課的程序要復雜的程序，讓學生學會分析問題，解決問題，會利用教材知識去完成這個程序。教師要及時的引導，使學生自己會讀程序，修改調試程序中出現的錯誤，為以后的課打下基礎第 3 課 謎語大擂臺(一)教學目標1、了解字符串的概念，熟悉字符串的合并運算。2、了解設置窗體屬性的方法。3、會使用 Timer、Image控件；掌握 Val()、Cstr()、Time$,會使用 VbCrlf4、進一步培養學習VB的興趣與熱情，

8、更深入地認識程序開發的奧妙。教學重點1、學會使用Timer控件、Image控件；2、掌握Val()、Cstr()、Timer$的使用方法，會使用 VBcrlf常數。教學難點1、學會使用Timer控件、Image控件；2、掌握Val()、Cstr()、Timer$的使用方法，會使用 VBcrlf常數。學生的學習方式自主學習，合作學習，探究學習教學策略設置情景 提出問題；師生討論 探究問題；獨立探索，小組合作 解決問題；交流、總結-完成任務、開拓思維一一創新作品。課時安排2課時教學過程導入：今天我們來玩一個猜謎游戲，看哪位同學能用最快的時間猜出來。教師運行“謎語大擂臺.frm ”，學生觀察界面并猜

9、謎語。這個猜謎游戲是如何制作的呢？環節一：分析問題師生討論界面設計中用到的控件。環節二：界面設計1、構建界面：學生操作，添加控件，完成界面設計。2、設置對象屬性：根據程序界面，在屬性窗口中設置每個控件的屬性值。采用自主探究和合作學習形式。環節三： 編寫代碼。學生根據課本內容自主學習、討論編寫代碼。教師講授Timer1 控件在程序中的作用、代碼編寫。教師引導學生掌握函數 Val()、Cstr()、Timer$的使用方法和VBcrlf常數的作用。環節四：練一練，增加一個清除按扭，將使謎語、計時信息都返回到初始態。自主探究、討論，完成任務。環節五：總結(學生討論總結，匯總)1、編寫程序過程中用到的控

10、件的屬性設置及用法2、用到的函數Val()、Cstr()、Timer$的使用方法，VBcrlf常數的作用3、字符串的概念，字符串合并運算。環節六： 實踐與創新設計一個電子鐘程序，用來顯示當前時間。第4課節約用水算水價教學目標1、了解流程圖的使用方法，了解一般編程過程。2、了解變量、數據類型，能定義實型變量和整形變量。3、學會變量進行賦值。4、會使用IF 語句、會使用算術運算符進行四則運算。5、通過對代碼編寫的學習，培養學生自主完成程序的能力。教學重點：1、學會使用If 條件選擇語句，解決簡單的問題；2、學會使用算術運算符進行四則運算代碼設計。教學難點：If 條件選擇語句學生的學習方式：自主學習

11、，合作學習，探究學習教學策略：設置情景 提出問題；師生討論 探究問題；獨立探索，小組合作 解決問題；交流、總結-完成任務、開拓思維一一實踐創新。課時安排：2課時教學過程：導入： 為了提高節水意識，促進人們形成良好的用水習慣，物價部門對居民用水實行階梯式水價：若用水量小于或等于12噸，價格為2.85 元 /噸；若用水量大于12噸，大于12噸的部分，價格為：2.85X2元/噸?，F在我們就替物價部門設計一個這樣的計算水費的程序。環節一：分析收取水費問題，畫出其流程圖。學生分組討論畫出流程圖。環節二：界面設計1、構建界面：學生操作，添加控件，完成界面設計。2、設置對象屬性：根據程序界面，在屬性窗口中設

12、置每個控件的屬性值。采用自主探究和合作學習形式。環節三： 代碼編寫，調試，運行。學生參考課本，自主學習探究。教師引導學生理解If語句的用法，引導學生理解賦值語句，總結VB中常見的數據類型教師準備幾個If 條件語句小程序，讓學生去讀程序，引導學生加深對If 語句的理解。環節五： 總結（學生分組總結，匯總）1、編寫程序過程中用到的控件的屬性設置及用法2、程序中用的到分支結構If 語句3、用到的函數、數據類型、變量、定義變量、變量賦值、算術運算符環節六： 實踐與創新設計一個程序“我怎么樣？”輸入學生成績，如果成績大于等于96 分，就輸出“very good! ”，如果成績小于 96 分，就輸出“ d

13、on' t give up”。分組討論，互助合作，完成任務教學反思這節課通過2課時學習，學會分析問題，用流程圖描述程序，程序中用到了分支結構If 語句，教師也可以寫一些簡單的程序讓學生讀程序，說出程序的運行結果，加強對If 語句的理解。第五課 謎語大擂臺(二)教學目標1、掌握常用函數Int() Rnd()msgbox()的用法。2、學會用Select 語句解決一些簡單的應用問題3、學會用Text 控件存儲變量值，會用流程圖分析問題。4、培養學生選擇判斷能力和嚴謹的邏輯思維習慣。教學重點：1、掌握常用函數Int() Rnd()msgbox()的用法。2、學會用Select 語句解決一些簡

14、單的應用問題3、學會用Text 控件存儲變量值，會用流程圖分析問題。教學難點：1、掌握常用函數Int() Rnd()msgbox()的用法。2、學會用Select 語句解決一些簡單的應用問題。3、學會用Text 控件存儲變量值，會用流程圖分析問題。學生的學習方式：自主學習，合作學習，探究學習教學策略：設置情景 提出問題；師生討論 探究問題；獨立探索，小組合作 解決問題；交流、總結-完成任務、開拓思維一一實踐創新。課時安排：2課時教學過程：導入：本單元第3 課我們設計過一個猜謎游戲，但那個游戲不夠完善。讓學生說出不完善的地方。這節課我們開發一個改進程序，教師把做好的程序展示給同學們看。環節一：分

15、析問題教師演示程序，學生理解這個謎語玩的過程。分組討論用流程圖描述程序。環節二：界面設計1、構建界面：學生操作，添加控件，完成界面設計。2、設置對象屬性：根據程序界面，在屬性窗口中設置每個控件的屬性值。采用自主探究和合作學習形式。環節三： 代碼設計、調試運行。學生參考課本自主學習探究，輸入程序運行調試。完成任務的同學當老師小助手輔導其他同學。教師引導學生讀程序，理解 Select語句的用法、三個函數Int(),Rnd() msgbox()的 用法。教師總結分支結構If 語句和 Select 語句的用法，區別。兩者可替代。教師準備兩個If 和 Select 語句的小程序，讓學生讀程序，看哪組同學

16、說出正確結果，加深對兩個分支結構語法的理解。環節四：總結(學生分組總結，匯總)1、編寫程序過程中用到的控件的屬性設置及用法2、程序中用的到分支結構Select 語句，并與If 語句的區別，兩種語句的替換用法。3、程序中用到的Int(),Rnd()msgbox()函數。環節五： 練習編寫“確認”按鈕的代碼。 (如課本中的“提示對話框”) ， 分 組 討 論 ， 互助合作，完成任務教學反思這節課通過2課時學習，掌握分支結構的另一種語句。教師引導同前一課的 If語句聯 系， 加深對分支結構的理解。第 6 課 會計小助理教學目標1、掌握計數循環的使用方法。2、掌握累加器的使用方法3、培養學生運用循環結

17、構，解決生活中實際問題的能力，激發學生程序設計的興趣。教學重點1、學會使用計數循環語句fornext 進行程序設計，教學難點1、學會使用計數循環語句fornext 進行程序設計，學生的學習方式：自主學習，合作學習，探究學習教學策略設置情景 提出問題；師生討論 探究問題；獨立探索，小組合作 解決問題；交流、總結-完成任務、開拓思維一一實踐創新。課時安排2課時教學過程導入： 算盤是我國古代偉大發明之一，由于它的獨特優勢今天而仍然成為會計人員的必修課，他們經常用算盤練習計算從1 開始連續加到某個整數的和，他們計算的結果是否正確？現在我們設計一個程序求“從 1 連續加到某個整數的和”，來驗證打算盤的準

18、確度。環節一：分析問題師生討論分析問題，用流程圖描述“會計小助手”程序。環節二：界面設計1、構建界面：學生操作，添加控件，完成界面設計。2、設置對象屬性：根據程序界面，在屬性窗口中設置每個控件的屬性值。采用自主探究和合作學習形式。環節三： 代碼編寫，調試運行程序。學生參考課本自主學習探究，分組討論，for next語句，累加器z=z+x的用法.完 成任務的同學當老師小助手輔導其他同學。環節四：把原程序修改為1 到 100 之間奇數的和。分組討論，看哪個小組的同學先做出來。合小組交流合作完成任務。環節五：總結(學生分組總結，匯總)1、編寫程序過程中用到的控件的屬性設置及用法2、程序中用的到循環結

19、構for next 語句。環節六：練習：p69想一想。如果我們在程序中輸入 5000,再求和的話，就會出現數據溢出錯誤，這是為什么呢？請試著在程序中限制輸入的位數，比如最多只能輸入4 位。學生分組討論，編寫程序。環節七： 實踐與創新設計一個程序，求從10 加到 1000的和。教學反思出些用 for next 編寫的程序，使學生會讀程序，加深對語句的理解和運用。第 7 課 欲與珠峰試比高教學目標1、學會使用條件循環語句；2、了解程序的健壯性；3、會使用計數器4、培養利用循環結構解決生活中實際問題的能力和思維的嚴密性，激發對程序設計的興趣。教學重點：1、學會使用條件循環語句Do loop 進行程序

20、設計。教學難點：1、學會使用條件循環語句Do loop 進行程序設計。學生的學習方式：自主學習，合作學習，探究學習教學策略：設置情景 提出問題；師生討論 探究問題；獨立探索，小組合作 解決問題；交流、總結-完成任務、開拓思維一一實踐創新。課時安排：2課時教學過程：導入：珠穆朗瑪峰海撥8844.43 米，如果你將一張紙不斷地對折，經過若干次的對折就能高于珠穆朗瑪峰的高度，你相信嗎，今天我們就開發這樣一個程序，來計算一下需要對折的次數。環節一：畫出流程圖。師生討論分析問題，畫出程序流程圖。環節二：界面設計1、構建界面：學生操作，添加控件，完成界面設計。2、設置對象屬性：根據程序界面，在屬性窗口中設

21、置每個控件的屬性值。采用自主探究和合作學習形式。環節三： 代碼設計，運行，調試。學生參考課本自主學習探究，分組討論 Do Loop語句的用法。完成任務的同學當老師小助手輔導其他同學。教師準備幾個DoLoop語句小程序，讓學生去讀程序，看哪組同學說出正確結果，引導學生理解循環語句循環的次數及條件的判斷，加深對Do Loop 語句的理解。教師總結For next 和 Do Loop 循環語句特點及區別。環節四： 總結（學生分組總結，匯總）1、編寫程序過程中用到的控件的屬性設置及用法2、程序中用的到循環結構do loop 語句用法。環節五： 實踐與創新（大顯身手）設計一個程序，求出從1 連續累加到某個最小的數，使它們的和不小于10000。分組討論，互助合作，完成任務教學反思這節課通過2課時學習，讓學生學習解決問題的方法，會使用 Do Loop語句。教師可以在此課的基礎上總結一下程序設計中用到的三種結構：順序結構、分支結構、循環結構。第 8 課 我的媒體播放器教學目標1、掌握通用對話框控件、多媒體控件的使用方法。2、學會插入pictru