第9课使用滚动条控件

1、三道岭一中教学案例任课老师姓名：阿不都克热木 日期：2014.11.10-11.14 第-1-课时. 总-2-节课题第9课使用滚动条控件课类信息技术教学目标1、知识目标：l 熟悉滚动条控件的用法l 了解vb中的rgb（）函数2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在不断摸索中陶冶情操。前提诊测1、在定时器控件中添加beep语句的作用是什么？导入新课大家在使用电脑时经常用到滚动条快速定位，今天我们就来学习在vb中使用滚动条控件的方法。教学方法任务驱动法、演示操作法教学重点滚

2、动条控件、rgb（）函数教学难点编写代码、调试程序教学过程一、分析示例程序“显示数值”二、设计程序“显示数值” 1、设计程序界面 1.1 创建新工程 1.2 绘制窗体界面：一个水平滚动条，三个标签和一个文本框2、修改对象属性对象属性属性值Frm1（名称）Frmdisplaycaption显示数值Borderstyle1-fixed singleLabel1caption小Label2caption大Label3caption当前数值是：Hscroll1（名称）hsbdisplayMin0Max100Largechange10text1（名称）Txtdisplaytext3、编写程序代码 Pri

3、vate Sub hsbDisplay_Change()txtDisplay.Text = hsbDisplay.ValueEnd Sub4、调试并保存程序5、生成可执行程序形成性测试制作显示数值程序小 结这节课我们学习了滚动条控件的使用方法，希望大家课外熟悉它们。板书设计第九课 使用滚动条控件一、分析示例程序二、设计程序作业P68 1课后反思组长签字三道岭一中教学案例任课老师姓名：阿不都克热木 日期：2014.11.10-11.14 第-2课时. 总-2-节课题第9课使用滚动条控件课类信息技术教学目标1、知识目标：l 熟悉滚动条控件的用法l 了解vb中的rgb（）函数2、能力目标：培养学生的

4、观察能力、自我探索、自主学习的能力和团体协作的能力。3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在不断摸索中陶冶情操。前提诊测1、在定时器控件中添加beep语句的作用是什么？导入新课大家在使用电脑时经常用到滚动条快速定位，今天我们就来学习在vb中使用滚动条控件的方法。教学方法任务驱动法、演示操作法教学重点滚动条控件、rgb（）函数教学难点编写代码、调试程序教学过程一、分析示例程序“调色板”二、设计程序“调色板” 1、设计程序界面 1.1 创建新工程 1.2 绘制窗体界面：三个水平滚动条，三个标签和一个图片框2、修改对象属性对象属性属性值frm1（名称

5、）Frmpalettecaption调色板borderstyle1-fixed singlelabel1（名称）Lblredcaption红label2（名称）Lblbluecaption蓝label3（名称）Lblgreencaption绿hscrollbar1（名称）HsbredMax255largechange10hscrollbar1（名称）HsbblueMax255largechange10hscrollbar1（名称）hsbgreenMax255largechange10picture（名称）picpreview3、编写程序代码 Private Sub Form_Load()hsb

6、Red.Value = 0hsbGreen.Value = 0hsbBlue.Value = 0picPreview.BackColor = RGB(0, 0, 0)End SubPrivate Sub hsbBlue_Change()picPreview.BackColor = RGB(hsbRed.Value, hsbGreen.Value, hsbBlue.Value)End SubPrivate Sub hsbGreen_Change()picPreview.BackColor = RGB(hsbRed.Value, hsbGreen.Value, hsbBlue.Value)End SubPrivate Sub hsbRed_Change()picPreview.BackColor = RGB(hsbRed.Value, hsbGreen.Value, hsbBlue.Value)End Sub4、调试并保存