【文章內(nèi)容簡介】 ll1_Change() = 紅色分值量： + Str$() = RGB(, , ) End Sub Private Sub HScroll1_Scroll() = 紅色分值量： + Str$() = RGB(, , ) End Sub Private Sub HScroll2_Change() = 綠色分值量： + Str$() = RGB(, , ) End Sub 四、布置作業(yè) 復(fù)習(xí)思考題、作業(yè)、參考書目： 作業(yè)： 復(fù)習(xí)課堂上的內(nèi)容 預(yù)習(xí)下節(jié)內(nèi)容 課后小結(jié)： 第 13 次 課教案 2020 年 10 月 17 日 星期 一 章 節(jié)： 第四章 常用控件 第七節(jié) 對話框 教學(xué)任務(wù)： 掌握： 對話框的應(yīng)用語法及應(yīng)用場合； 理解： 消息框、通用對話框的靈活調(diào)用 了解： 打印對話框和幫助對話框的使用 重點(diǎn)及難點(diǎn)： 重點(diǎn)： 對話框的應(yīng)用語法及應(yīng)用場合； 難點(diǎn)： 消息框、通用對話框的靈活調(diào)用 教學(xué)內(nèi) 容提要： 一、 消息框 MsgBox函數(shù)的一般格式如下： 變量＝ MsgBox（提示信息 [,buttons][,標(biāo)題欄信息 ]） MsgBox語句的一般格式如下 MsgBox（提示信息 [,buttons][,標(biāo)題欄信息 ]） 二、 通用對話框 (公用對話框 ) 通用對話框的設(shè)置 Action 屬性 對話框類型 方法 1 打開文件（ Open） ShowOpen 2 保存文件（ Save As） ShowSave 3 選擇顏色（ Color） ShowColor 4 選擇字體（ Font） ShowFont 5 打?。?Print） ShowPrinter 6 幫助文件（ Help） ShowHelp 三、自定義對話框 復(fù)習(xí)思考題、作業(yè)、參考書目： 課后小結(jié)： 第 14 次 課教案 2020 年 10 月 19 日 星期 三 章 節(jié)： 第四章 常用控件 第八節(jié) 圖片框和圖像框 教學(xué)任務(wù)： 掌握： 圖片框和圖像框常用屬性及常用方法和事件 理解： 圖片框和圖像框的區(qū)別 了解： 圖片框和圖像框的特殊事件 重點(diǎn)及難點(diǎn)： 重點(diǎn)： 圖片框和圖像 框常用屬性 難點(diǎn)： 圖片框和圖像框的區(qū)別 教學(xué)內(nèi)容提要： 一、圖片框 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è) 復(fù)習(xí)思考題、作業(yè)、參考書目： 作業(yè)： 復(fù)習(xí) 圖片框和圖像框的屬性、方法和事件 預(yù)習(xí)下一節(jié)的內(nèi)容 課后小結(jié)： 第 15 次 課教案 2020 年 10 月 24 日 星期 一 章 節(jié)： 第四章 常用控件 第九節(jié) 計(jì)時器 教學(xué)任務(wù)： 掌握： 計(jì)時器的常用屬性及常用方法和事件 理解： 計(jì)時器的常用屬性和事件 了解： 計(jì)時器在動畫設(shè)計(jì)方面的應(yīng)用 重點(diǎn)及難點(diǎn)： 重點(diǎn)： 計(jì)時器的常用屬性及常用方法和事件 難點(diǎn)： 計(jì)時器的應(yīng)用 教學(xué)內(nèi)容提要： 一、常用屬性 二、計(jì)時器的事件 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 三、上機(jī)實(shí)驗(yàn) 4— 常用控件的應(yīng)用 四、布置作業(yè) 復(fù)習(xí)思考題、作業(yè)、參考書目： 作業(yè)： 利用計(jì)時器設(shè)計(jì)時鐘程序 預(yù)習(xí)動畫設(shè)計(jì) 課后小結(jié)： 第 16 次 課教案 2020 年 10 月 26 日 星期 三 章 節(jié)： 第四章 常用控件 第十節(jié) 動畫設(shè)計(jì) 上機(jī)實(shí)驗(yàn) 4常用控件應(yīng)用 教學(xué)任務(wù)： 掌握： 動畫設(shè)計(jì)的方法 理解： 動畫設(shè)計(jì)的實(shí)現(xiàn) 了解： 動畫設(shè)計(jì)的 Move方法 重點(diǎn)及難點(diǎn)： 重點(diǎn)： 動畫設(shè)計(jì)的方法 難點(diǎn)： 動畫設(shè)計(jì)的實(shí)現(xiàn) 教學(xué)內(nèi) 容提要： 一、在 VB 中實(shí)現(xiàn)動畫最常用的有以下幾種方法： 用 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 二、上機(jī)實(shí)驗(yàn) 4— 常用控件的應(yīng)用 三、布置作業(yè) 復(fù)習(xí)思考題、作業(yè)、參考書目： 作業(yè)： 上機(jī)實(shí)驗(yàn) 4— 常用控件的應(yīng)用 設(shè)計(jì)鳥在飛行 課后小結(jié)： 第 17 次 課教案 2020 年 10 月 31 日 星期 一 章 節(jié)： 第五章 菜單設(shè)計(jì) 第一節(jié) 菜單的功能和組成 第二節(jié) 菜單編輯器 第三節(jié) 創(chuàng)建下拉式菜單 第四節(jié) 菜單的控制 教學(xué)任務(wù)： 掌握： 利用菜單編輯器創(chuàng)建下拉式菜單的方法及功能控制 理解 ： 創(chuàng)建彈出式菜單的方法 了解： 菜單的功能和組成 重點(diǎn)及難點(diǎn)： 重點(diǎn)： 利用菜單編輯器創(chuàng)建下拉式菜單的方法及功能控制； 難點(diǎn)： 利用菜單編輯器創(chuàng)建下拉式菜單的方法及功能控制 教學(xué)內(nèi)容提要： 一、 復(fù)習(xí)上一節(jié)的控件屬性及事件、方法 二、 介紹菜單的功能和組成 三、 介紹菜單編輯器 四、 下拉式菜單的創(chuàng)建 五、 菜單的有效性控制 六、菜單項(xiàng)標(biāo)記的控制 七、菜單項(xiàng)的動態(tài)增減 八、布置作業(yè) 復(fù)習(xí)思考題、作業(yè)、參考書目： 作業(yè)： 簡述 Visual Basic 菜單設(shè)計(jì)器的基本構(gòu)成和各部分的作用。 菜單的熱鍵和快捷鍵有什么區(qū)別？如何為菜單設(shè)置熱鍵和快捷鍵？ 課后小結(jié)： 第 18 次 課教案 2020 年 11 月 2 日 星期 三 章 節(jié)： 第五章 菜單設(shè)計(jì) 第五節(jié) 創(chuàng)建彈出式菜單 上機(jī)實(shí)驗(yàn) 5— 實(shí)際應(yīng)用程序菜單 教學(xué)任務(wù)： 掌握： 利用菜單編輯器創(chuàng)建彈出式菜單的方法及功能控制 理解： 創(chuàng)建彈出式菜單的方法 了解： 彈出菜單的各種功能 重點(diǎn)及難點(diǎn)： 重點(diǎn)： 利用菜單編輯器創(chuàng)建彈出式菜單的方法及功能控制； 難點(diǎn)： 利用菜單編輯器創(chuàng)建彈出式菜單的方法及功能控制 教學(xué)內(nèi)容提要： 一、復(fù)習(xí)上一節(jié)的內(nèi)容 二、 創(chuàng)建彈出式菜單 格式： [對象名 ]． PopupMenu 菜單項(xiàng)