《使用滚动条控件》参考教案

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

3、编写程序代码PrivateSubhsbDisplay_Change()txtDisplay.Text=hsbDisplay.ValueEndSub4、调试并保存程序5、生成可执行程序形成性测试制作显示数值程序小结这节课我们学习了滚动条控件的使用方法，希望大家课外熟悉它们。板书设计第九课使用滚动条控件一、分析示例程序二、设计程序作业P681课后反思组长签字课题第9课使用滚动条控件（第2课时）课类信息技术教学目标1、知识目标：熟悉滚动条控件的用法了解vb中的rgb（）函数2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在不断摸索中陶冶情操。前提诊测1、在定时器控件中添加beep语句的作用是什么？导入新课大家在使用电脑时经常用到滚动条快速定位，今天我们就来学习在vb中使用滚动条控件的方法。教学方法任务驱动法、演示操作法教学重点滚动条控件、rgb（）函数教学难点编写代码、调试程序教学过程一、分析示例程序“调色板”二、设计程序“调色板”1、设计程序界面1.1创建新工程1.2绘制窗体界面：三个水平滚动条，三个标签和一个图片框2、修改对象属性对象属性属性值frm1（名称）Frmpalettecaption调色板borderstyle1-fixedsinglelabel1（名称）Lblredcaption红label2（名称）Lblbluecaption蓝label3（名称）Lblgreencaption绿hscrollbar1（名称）HsbredMax255largechange10hscrollbar1（名称）HsbblueMax255largechange10hscrollbar1（名称）hsbgreenMax255largechange10picture（名称）picpreview3、编写程序代码PrivateSubForm_Load()hsbRed.Value=0hsbGreen.Value=0hsbBlue.Value=0picPreview.BackColor=RGB(0,0,0)EndSubPrivateSubhsbBlue_Change()picPreview.BackColor=RGB(hsbRed.Value,hsbGreen.Value,hsbBlue.Value)EndSubPrivateSubhsbGreen_Change()picPreview.BackColor=RGB(hsbRed.Value,hsbGreen.Value,hsbBlue.Value)EndSubPrivateSubhsbRed_Change()picPreview.BackColor=RGB(hsbRed.Value,hsbGreen.Value,hsbBlue.Value)EndSub4、调试并保存程序5、生