文档内容
九年级信息技术教案
王庆华任课老师姓名：王庆华 第-----1--课时. 总-2------节
课题 第1课 vb 开发环境简介 信息技术
课类
教学目标 1、知识目标：
了解程序设计的一些术语
熟悉vb开发环境
掌握启动与退出vb的方法
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，
在不断摸索中陶冶情操。
前提诊测 1、如何打开并关闭vb程序
导入新课 软件开发是一门新兴的朝阳产业，而期中程序设计就是它的最基础部分，这学期我们通过学习
vb来掌握程序开发。
教学方法 任务驱动法、演示操作法
教学重点 认识vb开发环境
教学难点 Vb界面中各部分的功能
教学过程 一、启动与退出vb
1.1 启动vb：桌面上双击快捷图标，执行“开始——程序——microsoft
Visual basic 6.0中文版”命令
1.2 退出vb：执行“文件——退出”命令，点击标题栏的关闭按钮
二、认识vb工作环境
Vb工作环境包括：标题栏、菜单栏、常用工具栏、工具箱以及窗口。
三、设置vb工作环境
用户可以根据自己需要对vb程序进行相关设置，执行“视图”菜单中的命令，可以打开或
关闭相应的窗口。
四、运行示例程序
演示“泡沫”、“飞舞的蝴蝶”、“计算器”。课题 第1课 vb 开发环境简介 信息技术
课类
形成性测试 1、把vb工具箱中的每个控件的英文名对应的中文名标注出来
小 结 本课我们主要学习vb程序的基本知识：
一、启动与退出vb
二、认识vb工作环境
Vb工作环境包括：标题栏、菜单栏、常用工具栏、工具箱以及窗口。
板书设计 第一课 vb 开发环境简介
一、 认识vb
二、 演示示例程序
作业 P8、1.练习启动与退出vb的方法，并将其归纳。任课老师姓名：王庆华 第-----2--课时. 总-2------节
课题 第1课 vb 开发环境简介 信息技术
课类
教学目标 1、知识目标：
了解程序设计的一些术语
熟悉vb开发环境
掌握启动与退出vb的方法
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，
在不断摸索中陶冶情操。
前提诊测 1、如何打开并关闭vb程序
导入新课 软件开发是一门新兴的朝阳产业，而期中程序设计就是它的最基础部分，这学期我们通过学习
vb来掌握程序开发。
教学方法 任务驱动法、演示操作法
教学重点 认识vb开发环境
教学难点 Vb界面中各部分的功能
教学过程 一、上机练习
二、知识点补充
1、程序设计语言：机器语言，汇编语言和高级语言
2、visual basic：可视化basic语言。编写程序时，可以通过鼠标操作用控件组成程序的窗口界
面，然后再编写相应的程序代码。
形成性测试 1、把vb工具箱中的每个控件的英文名对应的中文名标注出来
小 结 本课我们主要学习vb程序的基本知识：
一、启动与退出vb
二、认识vb工作环境
Vb工作环境包括：标题栏、菜单栏、常用工具栏、工具箱以及窗口。
板书设计 第一课 vb 开发环境简介
一、 认识vb
二、 演示示例程序
作业 P8、1.练习启动与退出vb的方法，并将其归纳。
任课老师姓名：王庆华 第-----1--课时. 总-2------节课题 第2课 编一个简单的程序 信息技术
课类
教学目标 1、知识目标：
熟悉标签控件、命令按钮控件
熟悉修改控件属性的基本方法
学会测试程序并掌握生成可执行文件的操作
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，
在不断摸索中陶冶情操。
前提诊测 1、如何打开并关闭vb程序
导入新课 上节课我们了解了vb的相关知识，这节课我们进入实战，来具体编写一个程序。
教学方法 任务驱动法、演示操作法
教学重点 学习vb程序设计的一般步骤
教学难点 标签控件、命令按钮控件
教学过程 一、分析示例程序“欢迎”
该程序由一个标签控件，一个命令按钮控件组成
二、编写“欢迎”程序
1、设计程序界面
1.1创建新工程
1.2 设计窗体：一个标签控件，一个命令控件
2、修改对象属性
对象 属性 属性值
Form1 （名称） 欢迎
Label1 Caption 你好，欢迎学习程序设计
Command1 Caption 退出
3、编写代码
Private sub command1_click()
End
End sub
4、调试并保存程序
5、生成可执行文件课题 第2课 编一个简单的程序 信息技术
课类
形成性测试 1、编写一个“自我介绍”的程序
小 结 这节课我们学习了vb程序设计的一般步骤：设计界面，修改属性，编写代码
板书设计 第二课 编一个简单的程序
一、 运行并分析示例程序
二、 编写程序
三、 运行并生成可执行文件
作业 P20：1 编写“自我介绍”程序，并修改字体，字体颜色，去掉标题栏的最大化和最小化按钮。任课老师姓名：王庆华 第-----2-课时. 总-2------节
课题 第2课 编一个简单的程序 课类 信息技术
教学目标 1、知识目标：
熟悉标签控件、命令按钮控件
熟悉修改控件属性的基本方法
学会测试程序并掌握生成可执行文件的操作
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、如何打开并关闭vb程序
导入新课 上节课我们了解了vb的相关知识，这节课我们进入实战，来具体编写一个程序。
教学方法 任务驱动法、演示操作法
教学重点 学习vb程序设计的一般步骤
教学难点 标签控件、命令按钮控件
教学过程 一、上机练习
制作“欢迎”程序
制作“自我介绍”程序
二、知识点补充
1、工程：在程序设计中，工程式应用程序文件的集合
Vb工程中常用的文件有：窗体文件、标准模块文件、类模块文件
形成性测试 1、编写一个“自我介绍”的程序
小 结 这节课我们学习了vb程序设计的一般步骤：设计界面，修改属性，编写代码
板书设计 第二课 编一个简单的程序
四、 运行并分析示例程序
五、 编写程序
六、 运行并生成可执行文件
作业 P20：1 编写“自我介绍”程序，并修改字体，字体颜色，去掉标题栏的最大化和最小化按钮。
课后反思
任课老师姓名：王庆华 第-----1-课时. 总-2------节
课题 第3课 使用文本框控件 课类 信息技术
教学目标 1、知识目标：
熟悉文本框控件
认识对象的visible属性
了解用代码设置对象属性的方法
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、vb工程中常用的文件有哪三类？
导入新课 掌握了标签、命令控件之后，我们经常还需要用到向程序中输入信息，这就要用到文本框控件。
教学方法 任务驱动法、演示操作法
教学重点 Textbox控件
教学难点 编写代码，调试程序
教学过程 一、分析示例程序“欢迎加入”
该程序由两个标签，一个文本框以及两个命令按钮控件组成。
二、编写“欢迎加入”程序
1、设计程序界面
1.1创建新工程
1.2 设计窗体：两个标签控件，两个个命令控件，一个文本框控件
2、修改对象属性
对象 属性 属性值
Form1 （名称） 欢迎加入
Label1 （名称） Lblname
Caption 请输入姓名：
Label2 （名称） Lbldisplay
Caption 同学，欢迎你！
Visible False
Text1 （名称） Txtname
Text
Command1 （名称） Cmdok
Caption 确定
Command2 （名称） CmdexitCaption 退出
3、编写代码
Private sub cmdexit_click()
End
End sub
Private sub cmdok_click()
Lblname.visible=false
Txtname.visible=false
Lbldisplay.caption=txtname.text+ Lbldisplay.caption
Lbldisplay.visible=true
txtname.text=””
End sub
4、调试并保存程序
5、生成可执行文件
形成性测试 1、编写一个“欢迎加入”的程序，如下图
小 结 这节课我们学习了文本框控件以及visible、autosize属性的设置。
板书设计 第三课 使用文本框控件
一、 运行并分析示例程序
二、 编写程序
作业 P33：1 编写“请输入姓名”程序。
任课老师姓名：王庆华 第-----2-课时. 总-2------节
课题 第3课 使用文本框控件 课类 信息技术
教学目标 1、知识目标：
熟悉文本框控件
认识对象的visible属性
了解用代码设置对象属性的方法
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、vb工程中常用的文件有哪三类？
导入新课 掌握了标签、命令控件之后，我们经常还需要用到向程序中输入信息，这就要用到文本框控件。
教学方法 任务驱动法、演示操作法
教学重点 Textbox控件
教学难点 编写代码，调试程序
教学过程 一、上机练习
制作“欢迎加入”程序
制作“请输入姓名”程序
二、知识点补充
1、对象名
2、对象的名称属性和caption属性3、“代码”窗口
4、输入代码时要遵循的原则
形成性测试 1、编写一个“欢迎加入”的程序，如下图
小 结 这节课我们学习了文本框控件以及visible、autosize属性的设置。
板书设计 第三课 使用文本框控件
一、 运行并分析示例程序
二、 编写程序
作业 P33：1 编写“请输入姓名”程序。
任课老师姓名：王庆华 第-----1-课时. 总-2------节
课题 第4课 使用联机帮助 课类 信息技术
教学目标 1、知识目标：熟悉vb的联机帮助
2、能力目标：培养学生使用工具解决问题的能力
3、情感目标：通过具体实例，发现问题解决问题，产生成就感
前提诊测 1、设置vb程序的窗体背景使用什么属性？
导入新课 编写vb程序时，遇到困难怎们办？有问题找谷歌，有困难找百度。我们这两个都不用找，就找vb的
联机帮助系统。
教学方法 任务驱动法、演示操作法
教学重点 MSDN Library在线帮助
教学难点 利用联机帮助解决问题
教学过程 一、 MSDN Library在线帮助
启动vb后，在“帮助”菜单中选择“内容”“索引”或“搜索”命令，打开MSDN Library visual
6.0窗口。
任务1、利用“搜索”选项卡查看关于标签控件的用法
启动vb，在“新建工程”对话框中选择“标准exe”选项，然后单击“打开”按钮。
执行“帮助——内容”命令，打开MSDN Library visual 6.0窗口。
在“活动子集”框中选择“*visual basic 文档”
打开“搜索”选项卡，在“输入要查找的单词”框中输入关键词“标签”
单击“列出主题”按钮，在“选择主题”下面的列表框中就会列出关于“标签”的一些主题
双击“使用label控件”右窗格中会显示出关于“label控件”的详细说明
二、上下文帮助
任务2、查找关于caption属性的知识
执行“视图——代码窗口”命令，打开“代码”窗口
输入一些代码后，把光标定位到某个关键词中
敲f1键，就显示出关于这个关键词的信息三、运行帮助中的代码实例
新建一个标准exe工程后，选定窗体，然后在“属性”窗口中选定“fillcolor”属性，敲f1键，打
开“帮助”窗口
单击其中的“示例”打开 fillcolor属性示例的帮助窗口
选定其中的代码部分，用复制，粘贴将其写到另外的程序中
运行程序
形成性测试 1、利用MSDN Library visual Studio 6.0窗口的“搜索”选项卡查看“窗体”的信息。
小 结 这节课我们学习了vb中的相关帮助：MSDN Library在线帮助、上下文帮助。
板书设计 第四课 使用联机帮助
一、 MSDN Library在线帮助
三、 上下文帮助。
作业 P40：1 使用联机帮助，查看标签控件都有哪些属性
2 使用联机帮助，了解关于变量、过程的知识
任课老师姓名：王庆华 第-----2-课时.
总-2------节
课题 第4 课 使用联机帮助 课类 信息技术
教学目标 1、知识目标：熟悉vb的联机帮助
2、能力目标：培养学生使用工具解决问题的能力
3、情感目标：通过具体实例，发现问题解决问题，产生成就感
前提诊测 1、设置vb程序的窗体背景使用什么属性？
导入新课 编写vb程序时，遇到困难怎们办？有问题找谷歌，有困难找百度。我们这两个都不用
找，就找vb的联机帮助系统。
教学方法 任务驱动法、演示操作法
教学重点 MSDN Library在线帮助
教学难点 利用联机帮助解决问题
教学过程 一、上机练习
二、教师指导
三、知识点补充
MSDN 是微软公司发布的一套windows开发者技术文档，它的作用就好像字典，提
供了开发程序中需要的各种资料，如使用平台、参数类型、参数作用等。
网址：http://msdn.microsoft.com/library/chs
形成性测试 1、利用MSDN Library visual Studio 6.0窗口的“搜索”选项卡查看“窗体”的信息。小 结 这节课我们学习了vb中的相关帮助：MSDN Library在线帮助、上下文帮助。
板书设计 第四课 使用联机帮助
一、 MSDN Library在线帮助
二、 上下文帮助。
作业 P40：1 使用联机帮助，查看标签控件都有哪些属性
2 使用联机帮助，了解关于变量、过程的知识
任课老师姓名：王庆华 第-----1-课时. 总-2------节
课题 第5课 使用选项按钮控件 课类 信息技术
教学目标 1、知识目标：
学会使用选项按钮控件
知道vb中过程的含义
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、vb中敲f1键的作用是什么？
导入新课 在实际生活中，我们经常面临着选项选择，那么今天我们就来学习在vb中设计选项
教学方法 任务驱动法、演示操作法
教学重点 选项按钮控件
教学难点 编写代码、调试程序
教学过程 一、分析演示程序“设置字体”二、设计程序“设置字体”
1、设计程序界面
1.1 创建新工程
1.2 设计窗体：一个标签控件，一个文本框控件，四个选项按钮控件，一个命令按钮控件。
2、修改对象属性
对象 属性 属性值
Form1 Caption 设置字体
Borderstyle 1-fixed single
Label1 Caption 请输入文字
（名称） txtwenzi
text1 Font 宋体、二号
text
option1 （名称） Optst
Caption 宋体
option1 （名称） Optyy
Caption 幼圆
option1 （名称） Optht
Caption 黑体
option1 （名称） Optls
Caption 隶书
command1 （名称） Cmdexit
Caption 退出
3、编写代码
打开代码窗口，编写如下代码：
Private Sub cmdExit_Click()
End
End Sub
Private Sub optHt_Click()
txtWenzi.Font = "黑体"
End Sub
Private Sub optLs_Click()
txtWenzi.Font = "隶书"
End Sub
Private Sub optSt_Click()
txtWenzi.Font = "宋体"
End Sub
Private Sub optYy_Click()
txtWenzi.Font = "幼圆"
End Sub
4、调试并保存程序5、生成可执行文件
形成性测试 1、编写一个“旅游信息”的程序，
小 结 本课我们学习了vb中的选项按钮控件，使用它进行信息采集。
板书设计
第五课 使用选项按钮控件
一、分析示例程序
二、设计程序
作业 P47 练习：编写一个“旅游信息”的程序
任课老师姓名：王庆华 第--2-课时. 总-2------节
课题 第5课 使用选项按钮控件 课类 信息技术
教学目标 1、知识目标：
学会使用选项按钮控件
知道vb中过程的含义
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、vb中敲f1键的作用是什么？
导入新课 在实际生活中，我们经常面临着选项选择，那么今天我们就来学习在vb中设计选项
教学方法 任务驱动法、演示操作法
教学重点 选项按钮控件
教学难点 编写代码、调试程序
教学过程 一、上机练习
二、教师指导
三、知识点补充
1、过程：在vb程序中，指挥计算机完成一定操作任务的一段程序代码叫做一个过程。根据程序
是否有返回值，分为：子程序过程和函数过程。
2、事件：用户对某个对象完成一个动作时，就发生了一个事件。
3、事件驱动程序：通过事件触发，执行事件过程的程序设计方式。
形成性测试 1、编写一个“旅游信息”的程序，小 结 本课我们学习了vb中的选项按钮控件，使用它进行信息采集。
板书设计
第五课 使用选项按钮控件
一、分析示例程序
二、设计程序
作业 P47 练习：编写一个“旅游信息”的程序
任课老师姓名：王庆华 第-----1-课时. 总-2------节
课题 第6课 制作菜单 课类 信息技术
教学目标 1、知识目标：
学会制作菜单的基本方法
了解用菜单命令控制程序的过程
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、vb中选项按钮用于什么条件下？
导入新课 我们常用的软件大多都有菜单项，今天我们就来学习如何编写菜单
教学方法 任务驱动法、演示操作法
教学重点 菜单编辑器
教学难点 菜单设计
教学过程 一、分析示例程序“文本编辑器”三、 设计程序“文本编辑器”
1、设计程序界面
1.1 创建新工程
1.2 绘制窗体界面：一个文本框
1、修改对象属性
对象 属性 属性值
Caption 文本编辑器
frm1
Borderstyle 1-fixed single
（名称） txtwz
text1 Text
scrollbars 2-vertical
multiline True
font 宋体、三号
2、编写程序代码
Private Sub mnuBlue_Click()
txtWz.ForeColor = vbBlue
End Sub
Private Sub mnuCls_Click()
txtWz.Text = ""
End Sub
Private Sub mnuExit_Click()
End
End Sub
Private Sub mnuGreen_Click()
txtWz.ForeColor = vbGreen
End Sub
Private Sub mnuHt_Click()
txtWz.Font = "黑体"End Sub
Private Sub mnuRed_Click()
txtWz.ForeColor = vbRed
End Sub
Private Sub mnuSt_Click()
txtWz.Font = "宋体"
End Sub
Private Sub mnuYy_Click()
txtWz.Font = "幼圆"
End Sub
3、调试并保存程序
4、生成可执行程序
形成性测试 1、编写一个“数据分析”的程序，
小 结 本课我们学习了使用vb设计程序菜单，需要注意菜单中访问键，快捷键，菜单分隔条的设计方法。
板书设计 第六课 制作菜单
一、分析示例程序
二、设计程序
作业 P57 设计一个菜单程序任课老师姓名：王庆华 第--2-课时. 总-2------节
课题 第6课 制作菜单 课类 信息技术
教学目标 1、知识目标：
学会制作菜单的基本方法
了解用菜单命令控制程序的过程
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、vb中选项按钮用于什么条件下？
导入新课 我们常用的软件大多都有菜单项，今天我们就来学习如何编写菜单
教学方法 任务驱动法、演示操作法
教学重点 菜单编辑器
教学难点 菜单设计
教学过程 一、上机练习
二、教师指导
三、知识点补充
1、菜单的访问键和快捷键
2、菜单分隔条
形成性测试 1、编写一个“数据分析”的程序，
小 结 本课我们学习了使用vb设计程序菜单，需要注意菜单中访问键，快捷键，菜单分隔条的设计方法。
板书设计 第六课 制作菜单
一、分析示例程序二、设计程序
作业 P57 设计一个菜单程序
任课老师姓名：王庆华 第--1-课时. 总-2------节
课题 第7课 使用图片框控件 课类 信息技术
教学目标 1、知识目标：
学会使用图片框控件
了解vb中函数的基本知识
熟悉loadpicture（）函数的用法
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、vb中制作菜单要用到什么工具？
导入新课 在vb程序中经常见到图片出现，今天我们就来学习如何在vb中使用图片框
教学方法 任务驱动法、演示操作法
教学重点 选项按钮控件、loadpicture（）函数
教学难点 编写代码、调试程序
教学过程 一、分析示例程序“公园四景”
二、设计程序“公园四景”
1、设计程序界面
1.1 创建新工程
1.2 绘制窗体界面：一个图片框、四个选项按钮2、修改对象属性
对象 属性 属性值
Frm1 Caption 公园四景
borderstyle 1-fixed single
picturebox （名称） picgarden
option1 （名称） opt1
Caption 草原八骏
option2 （名称） Opt2
Caption 水关新意
option3 （名称） Opt3
Caption 大都庆典
option4 （名称） Opt4
Caption 鞍缰盛世
1、编写程序代码
Private Sub Opt1_Click()
picGarden.Picture = LoadPicture("d:\vbImage\1.jpg")
End Sub
Private Sub Opt2_Click()
picGarden.Picture = LoadPicture("d:\vbImage\2.jpg")
End Sub
Private Sub Opt3_Click()
picGarden.Picture = LoadPicture("d:\vbImage\3.jpg")
End Sub
Private Sub Opt4_Click()
picGarden.Picture = LoadPicture("d:\vbImage\4.jpg")
End Sub
2、调试并保存程序
3、生成可执行程序
形成性测试 1、将选项按钮换为命令按钮，编写本科程序程序，小 结 本课重点介绍了loadpicture()函数，其一般格式为： loadpicture(“图像文件名”)。其中“图像文件
名”应包含图像文件所在的路径，如：“d:\vbImage\3.jpg”。
板书设计 第七课 使用图片框控件
一、分析示例程序
二、设计程序
作业 P62 设计“地雷引爆”程序
任课老师姓名：王庆华 第--2-课时. 总-2------节
课题 第7课 使用图片框控件 课类 信息技术
教学目标 1、知识目标：
学会使用图片框控件
了解vb中函数的基本知识
熟悉loadpicture（）函数的用法
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、vb中制作菜单要用到什么工具？
导入新课 在vb程序中经常见到图片出现，今天我们就来学习如何在vb中使用图片框
教学方法 任务驱动法、演示操作法
教学重点 选项按钮控件、loadpicture（）函数
教学难点 编写代码、调试程序
教学过程 一、上机练习
二、教师指导
三、知识点补充
1.vb中的函数：用户定义的函数和内部函数
2.loadpicture（）函数：
一般格式：loadpicture（“图像文件名”）
形成性测试 1、将选项按钮换为命令按钮，编写本科程序程序，
小 结 本课重点介绍了loadpicture()函数，其一般格式为： loadpicture(“图像文件名”)。其中“图像文件
名”应包含图像文件所在的路径，如：“d:\vbImage\3.jpg”。
板书设计 第七课 使用图片框控件
一、分析示例程序
二、设计程序
作业 P62 设计“地雷引爆”程序任课老师姓名：王庆华 第--2-课时. 总-2------节
课题 第8课使用定时器控件 课类 信息技术
教学目标 1、知识目标：
了解时间函数和日期函数
熟悉定时器控件的用法
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、loadpicture（）函数的一般格式？
导入新课 在计算机中有一个时钟，启动计算机后，windows会读取这个时钟的时间，在任务栏右侧显示出
来。使用vb中的日期和时间函数，也可以编一个显示日期和时间的程序。
教学方法 任务驱动法、演示操作法
教学重点 定时器控件、date（）、time（）函数
教学难点 编写代码、调试程序
教学过程 一、分析示例程序“显示日期和时间”
二、设计程序“显示日期和时间”
1、设计程序界面
1.1 创建新工程
1.2 绘制窗体界面：四个标签控件、一个命令按钮控件、一个定时器控件2、修改对象属性
对象 属性 属性值
Frm1 （名称） Frmdisplay
caption 显示时间和日期：
Label1 caption 当前时间为：
label2 （名称） Lbltime
caption
label3 caption 当前日期为：
label4 （名称） Lbldate
caption
timer （名称） Tmrtime
intervsl 1000
Command1 （名称） Cmdexit
caption 退出
3、编写程序代码
Private Sub cmdExit_Click()
End
End Sub
Private Sub Form_Load()
lblTime.Caption = Time
lblDate.Caption = Date
End Sub
Private Sub tmrTime_Timer()
lblTime.Caption = Time
Beep
4、调试并保存程序
5、生成可执行程序
形成性测试 1、添加beep语句，并将定时器的enabled属性改为false，然后运行程序并观察。
小 结 这节课我们学习了定时器控件的使用方法，以及时间和日期函数。希望大家课外熟悉它们。
板书设计 第八课 使用定时器控件一、分析示例程序
二、设计程序
作业 P65 1
任课老师姓名：王庆华 第--2-课时. 总-2------节
课题 第8课使用定时器控件 课类 信息技术
教学目标 1、知识目标：
了解时间函数和日期函数
熟悉定时器控件的用法
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、loadpicture（）函数的一般格式？
导入新课 在计算机中有一个时钟，启动计算机后，windows会读取这个时钟的时间，在任务栏右侧显示出
来。使用vb中的日期和时间函数，也可以编一个显示日期和时间的程序。
教学方法 任务驱动法、演示操作法
教学重点 定时器控件、date（）、time（）函数
教学难点 编写代码、调试程序
教学过程 一、上机练习
二、教师指导
三、知识点补充
1.time()函数
2.date()函数
形成性测试 1、添加beep语句，并将定时器的enabled属性改为false，然后运行程序并观察。
小 结 这节课我们学习了定时器控件的使用方法，以及时间和日期函数。希望大家课外熟悉它们。
板书设计 第八课 使用定时器控件
一、分析示例程序
二、设计程序
作业 P65 1任课老师姓名：王庆华 第--1-课时. 总-2------节
课题 第9课使用滚动条控件 课类 信息技术
教学目标 1、知识目标：
熟悉滚动条控件的用法
了解vb中的rgb（）函数
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、在定时器控件中添加beep语句的作用是什么？
导入新课 大家在使用电脑时经常用到滚动条快速定位，今天我们就来学习在vb中使用滚动条控件的方法。
教学方法 任务驱动法、演示操作法
教学重点 滚动条控件、rgb（）函数
教学难点 编写代码、调试程序
教学过程 一、分析示例程序“显示数值”
二、设计程序“显示数值”
1、设计程序界面
1.1 创建新工程
1.2 绘制窗体界面：一个水平滚动条，三个标签和一个文本框
2、修改对象属性
对象 属性 属性值（名称） Frmdisplay
Frm1
caption 显示数值
Borderstyle 1-fixed single
Label1 caption 小
Label2 caption 大
Label3 caption 当前数值是：
（名称） hsbdisplay
Hscroll1 Min 0
Max 100
Largechange 10
text1 （名称） Txtdisplay
text
3、编写程序代码
Private Sub hsbDisplay_Change()
txtDisplay.Text = hsbDisplay.Value
End Sub
4、调试并保存程序
5、生成可执行程序
形成性测试 制作显示数值程序
小 结 这节课我们学习了滚动条控件的使用方法，希望大家课外熟悉它们。
板书设计 第九课 使用滚动条控件
一、分析示例程序
二、设计程序
作业 P68 1任课老师姓名：王庆华 第--2-课时. 总-2------节
课题 第9课使用滚动条控件 课类 信息技术
教学目标 1、知识目标：
熟悉滚动条控件的用法
了解vb中的rgb（）函数
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、在定时器控件中添加beep语句的作用是什么？
导入新课 大家在使用电脑时经常用到滚动条快速定位，今天我们就来学习在vb中使用滚动条控件的方法。
教学方法 任务驱动法、演示操作法
教学重点 滚动条控件、rgb（）函数
教学难点 编写代码、调试程序
教学过程 一、分析示例程序“调色板”
二、设计程序“调色板”
1、设计程序界面
1.1 创建新工程
1.2 绘制窗体界面：三个水平滚动条，三个标签和一个图片框
2、修改对象属性
对象 属性 属性值
（名称） Frmpalette
frm1
caption 调色板
borderstyle 1-fixed single
label1 （名称） Lblred
caption 红
label2 （名称） Lblblue
caption 蓝
label3 （名称） Lblgreencaption 绿
（名称） Hsbred
hscrollbar1
Max 255
largechange 10
（名称） Hsbblue
hscrollbar1
Max 255
largechange 10
（名称） hsbgreen
hscrollbar1
Max 255
largechange 10
picture （名称） picpreview
3、编写程序代码
Private Sub Form_Load()
hsbRed.Value = 0
hsbGreen.Value = 0
hsbBlue.Value = 0
picPreview.BackColor = RGB(0, 0, 0)
End Sub
Private Sub hsbBlue_Change()
picPreview.BackColor = RGB(hsbRed.Value, hsbGreen.Value, hsbBlue.Value)
End Sub
Private Sub hsbGreen_Change()
picPreview.BackColor = RGB(hsbRed.Value, hsbGreen.Value, hsbBlue.Value)
End Sub
Private Sub hsbRed_Change()
picPreview.BackColor = RGB(hsbRed.Value, hsbGreen.Value, hsbBlue.Value)
End Sub
4、调试并保存程序
5、生成可执行程序
形成性测试 制作调色板程序
小 结 这节课我们学习了滚动条控件的使用方法，希望大家课外熟悉它们。
板书设计 第九课 使用滚动条控件
一、分析示例程序
二、设计程序
作业 P68 1任课老师姓名：王庆华 第--1-课时. 总-2------节
课题 第十课 顺序结构 课类 信息技术
教学目标 1、知识目标：
掌握顺序结构程序的特点
熟悉val（）函数的用法
了解变量的知识
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发求知欲，在
不断摸索中陶冶情操。
前提诊测 1、1、滚动条控件的用法？
导入新课 按顺序办事，是我们经常采用的工作方式，在vb中我们也会见到“按顺序办事”的程序
教学方法 任务驱动法、演示操作法
教学重点 滚动条控件、rgb（）函数
教学难点 编写代码、调试程序
教学过程 一、分析示例程序“计算长方体的表面积”二、设计程序“计算长方体的表面积”
1、设计程序界面
1.1 创建新工程
1.2 绘制窗体界面：三个文本框，三个命令，一个标签和一个框架
2、修改对象属性
对象 属性 属性值
Frm1 caption 计算长方体的表面积
borderstyle 1-fixed single
Frame1 caption 请输入长、宽、高
Text1 （名称） txta
text
Text2 （名称） Txtb
text
Text3 （名称） txtc
text
command1 （名称） cmdcal
caption 长方体的表面积为
Command2 （名称） Cmdclear
caption 重新计算
command3 （名称） Cmdexit
caption 退出
label1 （名称） lblmj
caption
3、编写程序代码
Private Sub cmdCal_Click()
Dim a As Single, b As Single, c As Singlea = Val(txtA.Text)
b = Val(txtB.Text)
c = Val(txtC.Text)
s = 2 * (a * b + b * c + c * d)
lblMj.Caption = s
End Sub
Private Sub cmdClear_Click()
txtA.Text = ""
txtB.Text = ""
txtC.Text = ""
lblMj.Caption = ""
End Sub
Private Sub cmdExit_Click()
End
End Sub
4、调试并保存程序
5、生成可执行程序
形成性测试 制作程序“计算长方体的表面积”
小 结 本课我们学习了顺序结构，在这种结构的程序中，计算机按照”从上至下“的顺序逐条执行
语句。
板书设计 第十课 顺序结构
一、分析示例程序
二、设计程序
作业 P85 1任课老师姓名：王庆华 第--1-课时. 总-2------节
课题 第十课 顺序结构 课类 信息技术
教学目标 1、知识目标：
掌握顺序结构程序的特点
熟悉val（）函数的用法
了解变量的知识
2、能力目标：培养学生的观察能力、自我探索、自主学习的能力和团体协作的能力。
3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不断尝试中激发
求知欲，在不断摸索中陶冶情操。
前提诊测 1、1、滚动条控件的用法？
导入新课 按顺序办事，是我们经常采用的工作方式，在vb中我们也会见到“按顺序办事”的程
序
教学方法 任务驱动法、演示操作法
教学重点 滚动条控件、rgb（）函数
教学难点 编写代码、调试程序
教学过程 一、上机练习
二、教师指导
三、知识点补充
1.算术表达式
2.变量
3.数据类型
4.val（）函数
形成性测试 制作程序“计算长方体的表面积”小 结 本课我们学习了顺序结构，在这种结构的程序中，计算机按照”从上至下“的顺
序逐条执行语句。
板书设计 第十课 顺序结构
一、分析示例程序
二、设计程序
作业 P85 1
