【文章內容簡介】 ll1_Change() = 紅色分值量： + Str$() = RGB(, , ) End Sub Private Sub HScroll1_Scroll() = 紅色分值量： + Str$() = RGB(, , ) End Sub Private Sub HScroll2_Change() = 綠色分值量： + Str$() = RGB(, , ) End Sub 四、布置作業(yè) 復習思考題、作業(yè)、參考書目： 作業(yè)： 復習課堂上的內容 預習下節(jié)內容 課后小結： 第 13 次 課教案 2020 年 10 月 17 日 星期 一 章 節(jié)： 第四章 常用控件 第七節(jié) 對話框 教學任務： 掌握： 對話框的應用語法及應用場合； 理解： 消息框、通用對話框的靈活調用 了解： 打印對話框和幫助對話框的使用 重點及難點： 重點： 對話框的應用語法及應用場合； 難點： 消息框、通用對話框的靈活調用 教學內 容提要： 一、 消息框 MsgBox函數的一般格式如下： 變量＝ MsgBox（提示信息 [,buttons][,標題欄信息 ]） MsgBox語句的一般格式如下 MsgBox（提示信息 [,buttons][,標題欄信息 ]） 二、 通用對話框 (公用對話框 ) 通用對話框的設置 Action 屬性 對話框類型 方法 1 打開文件（ Open） ShowOpen 2 保存文件（ Save As） ShowSave 3 選擇顏色（ Color） ShowColor 4 選擇字體（ Font） ShowFont 5 打?。?Print） ShowPrinter 6 幫助文件（ Help） ShowHelp 三、自定義對話框 復習思考題、作業(yè)、參考書目： 課后小結： 第 14 次 課教案 2020 年 10 月 19 日 星期 三 章 節(jié)： 第四章 常用控件 第八節(jié) 圖片框和圖像框 教學任務： 掌握： 圖片框和圖像框常用屬性及常用方法和事件 理解： 圖片框和圖像框的區(qū)別 了解： 圖片框和圖像框的特殊事件 重點及難點： 重點： 圖片框和圖像 框常用屬性 難點： 圖片框和圖像框的區(qū)別 教學內容提要： 一、圖片框 1. 圖片框的常用屬性 2. 向圖片框中插入圖片的三種方法 3. 圖片框的事件 二、 圖像框 圖像框的常用屬性 圖像框與圖片框的區(qū)別 【例 】 Private Sub Command1_Click() = + 100 = + 100 End Sub Private Sub Command2_Click() = 1800 = 2655 = 1815 = 240 End Sub Private Sub Command3_Click() End End Sub 三、布置作業(yè) 復習思考題、作業(yè)、參考書目： 作業(yè)： 復習 圖片框和圖像框的屬性、方法和事件 預習下一節(jié)的內容 課后小結： 第 15 次 課教案 2020 年 10 月 24 日 星期 一 章 節(jié)： 第四章 常用控件 第九節(jié) 計時器 教學任務： 掌握： 計時器的常用屬性及常用方法和事件 理解： 計時器的常用屬性和事件 了解： 計時器在動畫設計方面的應用 重點及難點： 重點： 計時器的常用屬性及常用方法和事件 難點： 計時器的應用 教學內容提要： 一、常用屬性 二、計時器的事件 Timer事件 【例 】主要代碼： Public i As Integer Private Sub Form_Load() i = 0 = 2800 End Sub Private Sub Command3_Click() = True = False = False = False = 2800 End Sub Private Sub Timer1_Timer() = + Date$ + + Time$ End Sub Private Static Sub Timer2_Timer() i = i + 1 = Str(i) End Sub 三、上機實驗 4— 常用控件的應用 四、布置作業(yè) 復習思考題、作業(yè)、參考書目： 作業(yè)： 利用計時器設計時鐘程序 預習動畫設計 課后小結： 第 16 次 課教案 2020 年 10 月 26 日 星期 三 章 節(jié)： 第四章 常用控件 第十節(jié) 動畫設計 上機實驗 4常用控件應用 教學任務： 掌握： 動畫設計的方法 理解： 動畫設計的實現 了解： 動畫設計的 Move方法 重點及難點： 重點： 動畫設計的方法 難點： 動畫設計的實現 教學內 容提要： 一、在 VB 中實現動畫最常用的有以下幾種方法： 用 Move方法移動控件或圖片； 變圖像的位置和尺寸； 在不同的位置顯示不同的圖片。 對象名 .Move Left， Top[， Width， Length] 【例 】主要代碼： Private Sub Form_Load() = False = False = False End Sub Private Static Sub Timer1_Timer() i = i + 1 If i = 15 Then = True Image1(0).Move Image1(0).Left, Image1(0).Top 30 If Image1(0).Top 1000 Then Image1(0).Top = End Sub Private Sub Timer2_Timer() j = j + 1 If j = 15 Then = True Image1(1).Move Image1(1).Left, Image1(1).Top 30 If Image1(1).Top 1000 Then Image1(1).Top = End Sub 二、上機實驗 4— 常用控件的應用 三、布置作業(yè) 復習思考題、作業(yè)、參考書目： 作業(yè)： 上機實驗 4— 常用控件的應用 設計鳥在飛行 課后小結： 第 17 次 課教案 2020 年 10 月 31 日 星期 一 章 節(jié)： 第五章 菜單設計 第一節(jié) 菜單的功能和組成 第二節(jié) 菜單編輯器 第三節(jié) 創(chuàng)建下拉式菜單 第四節(jié) 菜單的控制 教學任務： 掌握： 利用菜單編輯器創(chuàng)建下拉式菜單的方法及功能控制 理解 ： 創(chuàng)建彈出式菜單的方法 了解： 菜單的功能和組成 重點及難點： 重點： 利用菜單編輯器創(chuàng)建下拉式菜單的方法及功能控制； 難點： 利用菜單編輯器創(chuàng)建下拉式菜單的方法及功能控制 教學內容提要： 一、 復習上一節(jié)的控件屬性及事件、方法 二、 介紹菜單的功能和組成 三、 介紹菜單編輯器 四、 下拉式菜單的創(chuàng)建 五、 菜單的有效性控制 六、菜單項標記的控制 七、菜單項的動態(tài)增減 八、布置作業(yè) 復習思考題、作業(yè)、參考書目： 作業(yè)： 簡述 Visual Basic 菜單設計器的基本構成和各部分的作用。 菜單的熱鍵和快捷鍵有什么區(qū)別？如何為菜單設置熱鍵和快捷鍵？ 課后小結： 第 18 次 課教案 2020 年 11 月 2 日 星期 三 章 節(jié)： 第五章 菜單設計 第五節(jié) 創(chuàng)建彈出式菜單 上機實驗 5— 實際應用程序菜單 教學任務： 掌握： 利用菜單編輯器創(chuàng)建彈出式菜單的方法及功能控制 理解： 創(chuàng)建彈出式菜單的方法 了解： 彈出菜單的各種功能 重點及難點： 重點： 利用菜單編輯器創(chuàng)建彈出式菜單的方法及功能控制； 難點： 利用菜單編輯器創(chuàng)建彈出式菜單的方法及功能控制 教學內容提要： 一、復習上一節(jié)的內容 二、 創(chuàng)建彈出式菜單 格式： [對象名 ]． PopupMenu 菜單項