【正文】 代碼 。否則讓對象到左邊框的距離加 100 End If End Sub 作業(yè)：復習這節(jié)課的內容，預習下節(jié)課的內容 組長意見： 第 4 課 操控自如 本課教學目標 。否則讓對象到左邊框的距離減 100 End If End Sub Private Sub Timer2_Timer() 39。 參考程序： Private Sub Timer1_Timer() 39。 參考程序： Private Sub Timer1_Timer() If Then 39。 參考程序： Private Sub Timer1_Timer() If Then 39。反復直觀教學 教學手段 ：機房 教學過程： 本課的學習過程中，首先引導學生通過語言描述瑪麗移出窗體左邊界時的位 置狀態(tài)，然后引導學生描述瑪麗處于移出窗體邊界與否所要作出的動作，最后根據描述給出條件判斷語句的程序代碼。 體會程序設計過程中分解、合成的程序設計思想。 作業(yè)：復習這節(jié)課的內容，預習下節(jié)課的內容 組長意見： 第 3 課 行走天涯 （一）本課教學目標 根據需要 用條件 判斷 語句 編寫程序 。 1讓雷電界面中的飛機向右自動移動。本課簡單介紹任務完成的過程，給學生多一些上機實踐的時間，在上機過程中要鍛煉學生獨立調試程序的能力。 難點： 對控件、對象、屬性、事件和事件過程的理解。 3. 學會設置對象的位置屬性 Left、 Top。 上機 練習 ： 先老師給同學們一步一步的設計一次，然后學生自己動手。引導學生對以往游戲對象中動作的實現(xiàn)方法進行探索、研究和學習。 難點： 對控件、對象、屬性、事件和事件過程的理解。 學會用時鐘控件控制操作對象的移動。 Visual Basic 的退出 單擊“文件 (F)”菜單中的“退出 (V)”命令，或單擊主窗中右上角的“關閉”按鈕，就可退出 Visual Basic。 Visual Basic 的啟動 單擊任務欄中的“開始”按鈕，將指針依次指向“程序（ P）”“ Microsoft Visual Basic” “ Visual Basic”，然后單擊，即可啟動 VB。由于 本課 教材涉及的基本知識較多， 盡管 難度都不大，但是占用的篇幅較大 ，因此本課沒能涉及 具體的編程任務。 難點 ： 一、 對控件、對象、屬性、事件和事件過程的理解。 類型：目前微型機所配置的標準鍵盤有 101（或 104）個按鍵、包括數(shù)字鍵、 作業(yè)：復習這節(jié)課內容，預習下 節(jié)課內容 組長意見： 第 1 單元 初級瑪麗 第 1 課 絢麗舞臺 （認識 vb） 本課教學目標 （一） 了解、熟悉 Visual BASIC 集成開發(fā)環(huán)境 。 計算機是一種可以進行自動控制、具有記憶功能的現(xiàn)代化今生今世工具和信息處理工具。 教學手段： 關于計算機的一些圖片， 硬件，一臺計算機。 20202020 年度第一學期九年級雙語班信息技術教案 洛浦縣多魯鄉(xiāng)一中 如則托和提 .拜戈鐵木爾 20202020年度第一學期 9年級雙語班信息技術課時計劃 作業(yè) 課題 周 復習 計算機基礎知識 1 復習 第 1 課 絢麗舞臺 （認識 vb） 2 復習 第 1 課 絢麗舞臺 3 復習 第 2 課 昂首闊 步 4 復習 第 3 課 行走天涯 5 復習 第 4 課 操控自如 6 復習 第 4 課 操控自如 7 復習 第 5 課 圖文并茂 8 復習 其中考試 9 復習 第 6 課 百變文字 10 復習 第 7 課 喜迎國慶 11 復習 第 8 課 涂鴉王國 12 復習 第 8 課 涂鴉王國 13 復習 第 9 課 系統(tǒng)集成 14 復習 第 10 課 美圖瀏覽 15 復習 第 10 課 美圖瀏覽 16 復習 第 11 課 時光如梭 17 期末考試 18 計算機基礎知識 教學目標 ：在教學中要降低理論難度、采取低起點小臺階的教學方法。 教學過程 ： 計算機基本概述 計算機是電子數(shù)字計算機的簡稱、是一種自動地、高速進行數(shù)值運算和信息處理的電子設備。它主要具有以下五個方面的特點： 1）運算速度快 2）計算精度高 3）記憶力 強 4）具有邏輯判斷能力 5）可靠性高 第一臺電子計算機的延生 第一臺計算機 (ENIAC)于 1946 年 2 月 ,在美國誕生。 （二） 學會游戲窗體 界面背景和前景的設計。 二、 對程序調試能力的培養(yǎng)。 而要讓學生了解界面上的功能，熟悉這些基本操作， 就 要讓學生在本課中通過一個簡單程序的設計全過程熟悉界面上的功能，體會用VB 設計程序的一般步驟。 啟動 VB 后，顯示如圖 64 所示的“新建工程”對話框，對話框中有“新建”“現(xiàn)存”“最新”三個標簽，可根據需要選擇工程的類型。 進入 VB 后，屏幕上顯示出如圖 65 所示的界面，主要由標 題欄、主菜單、工具欄、窗體設計器窗口、工具箱、工程資源管理器窗口、屬性窗口、代碼編輯器窗口等組成。 通過瑪麗移動的程序設計，了解程序設計的基本過程。 對程序調試能力的培養(yǎng)。從而提高學生學習的興趣。 任務 1：讓操作 對象瑪麗自左向右自動移動。 4. 學會對象屬 性的 靜態(tài)設置和 動態(tài)設置 。 對程序調試能力的培養(yǎng)。 本課是提出了本教材的第一個需要編寫程序的任務，時鐘控件也是學生學習的第一個控件，由時鐘控件生成的對象需要設置時間間隔 Interval 屬性，由圖像控件生成的對象需要設置圖像 Image1的位置屬性，窗體也需要設置其標識 Caption 屬性。 1讓雷電界面中的飛機向上自動移動。 。 難點： 記住 對控件、對象 的 屬性。 在編寫瑪麗懸崖墜落的程序代碼時，首先通過屬性窗口令控制直行的時鐘的 Enabled 屬性值處于可用狀態(tài)，令控制墜落的時鐘 Enabled 屬性值處 于不可用狀態(tài)。如果對象到左邊框的距離大于窗體的寬 = 0 39。如果對象到 上 邊框的距離小于對象高的相反數(shù) = 39。向左移動的時鐘控制 If = 0 Then 39。向右移動的時鐘控制 If = 3840 Then 39。 和 調試過程 。 對程序調試能力的培養(yǎng)。根據以上描述可設置各時鐘不同狀態(tài)下的 Enabled 屬性，正確實現(xiàn)幾個動作之間的轉換和銜接。 上機 練習參考答案： Dim a Private Sub Form_KeyPress(KeyAscii As Integer) 39。行走計時器不可用 = True 39。邁步瑪麗圖像可見 = False 39?，旣惖阶筮吙虻木嚯x If a 3960 And a 4680 Then 39。直立瑪麗圖像可見 = False 39。邁步瑪麗圖像可見 Else = False 39。直立 瑪麗左移 End If End Sub Rem 墜崖 Private Sub Timer2_Timer() 39。向上移動 Else = False 39。向下移動 Else a = 39?，旣愄幱趹已路秶呐袛? = True 39。行走計時器可用 End If End If End Sub Private Sub Form_Click() 39。邁步 瑪麗到上邊框的初始位置 = 3550 39。跳起計時器不可用 = False 39。 。 對程序調試能力的培養(yǎng)。按 a鍵則 39。 2. 進一步理解對象的屬性。 6. 掌握創(chuàng)建控件數(shù)組的基本方 法，了解控件數(shù)組的作用。 10. 掌握用 Line 方法畫線 、用 Pset 方法畫點 。 五、 重點難點 重點： 1. 學習 標簽、 命令按鈕、單選按鈕、圖片框、復選框、框架等控件的使用方法。 5. 理解程序的分支結構和循環(huán)結構。 2. 學會 RGB 函數(shù)的功能和使用方法。 6. 理解程序的分支結構和循環(huán)結構。 ? 掌握標簽的常用屬性設置方法以及用法。 ? 了解 VB 程序中語句的書寫規(guī)范。 ? 了解 Select Case 語句的功能和應用，掌握循環(huán)語句 For/Next的功能和應用。反復直觀教學 （五 ） 教學手段 ：機房 教學過程： 教材分析 通過本節(jié)課的學習讓學生在完成任務的過程中，加深對編寫VB 程序過程的了解。例題中涉及到的變量定義一定不能忽視，對于 Static 定義的靜態(tài)變量特點，學生會難以理解，教師可借助教材中的 DIY 幫助學生理解。 創(chuàng)作天地 （需要的圖片資料老師給學生提供準備） 設置時因學生的基礎知識很低，課程內容多，時間不夠所以老師給學生編制“左上”一個命令按鈕的程序代碼。 5. 編 程，用 8個命令按鈕分別控制標簽框、圖像框等操作對象，朝上、下、左、右、左上、左下、右上、右下八個方向移動。下 = + 200 End Sub Private Sub Command3_Click() 39。左下 = + 200 = 200 End Sub Private Sub Command7_Click() 39。 ? 了解調整控件格式的方法。 ? 能獨立根據樣例設計簡單用戶界面 ， 能獨立依據屬性設置表設置對象的屬性。 為了學生能很快入手，告訴學生先來制作一個只具有設置字體功能的程序，根據教材圖例讓學生說出窗體上要 添加的控件分別是什么、有多少個。讓學生思考“字形”中的粗體和斜體是可以同時選中的，所以制作“粗體”和“斜體”選項不能再使用單選按鈕了，引 入復選框控件的功能和用法。 1. 編寫如圖 所示的課程表程序。 Frame3（框架 3） Caption 顏色 OptionBotton1（單選按鈕 1 控件數(shù)組） Index 12? 15 Caption 紅 Frame4（框架 4） Caption 字形 CheckBox1（復選框 1 控件數(shù)組） Index 0? 3 Caption 粗體 （ 3） 程序代碼 Private Sub Check1_Click(Index As Integer) = Check1(0).Value 39。刪除線 End Sub Private Sub Option1_Click(Index As Integer) Select Case Index Case 0: = 語文 數(shù)學 體育 英語 化學 音樂 Case 1: = 數(shù)學 語文 英語 物理 信息技術 班會 Case 2: = 數(shù)學 英語 地理 體育 美術 物理 Case 3: = 英語 語文 數(shù)學 化學 政治 歷史 Case 4: = 數(shù)學 英語 語文 化學 生物 物理 Case 5: = 宋體 Case 6: = 黑體 Case 7: = 幼圓 Case 8: = 隸書 Case 9: = 9 Case 10: = 14