VB教案全套

教学过一、导入新课（提问法）
程1、教师提出疑问：如何打幵并关闭vb程序，从而导入课题
软件幵发是一门新兴的朝阳产业，而期中程序设计就是它的最基础部
分，这学期我们通过学习vb来掌握程序幵发。

二、讲授新课（讲授演示法）
1、启动与退出vb
启动vb :桌面上双击快捷图标，执行“幵始--------- 程序 --- microsoft
Visual basic 中文版”命令。

教师讲解，有以下四种启动方式。

方法1.使用“开始”菜单的“程序”命令；
方法2.使用“我的电脑”图标，找到“”并双击它；
方法3.使用“开始”菜单的“运行”命令；方法4.利用快捷方式。

退出vb :执行“文件一一退出”命令，点击标题栏的关闭按钮
2、认识vb工作环境
Vb工作环境包括：标题栏、菜单栏、常用工具栏、工具箱以及窗口
教师讲解，有以下两种退出方式。

1•“文件”菜单—> “退出”
+ Q
系统将提示是否存盘，根据需要回答“ Y' / “ N ”
3、设置vb工作环境
用户可以根据自己需要对vb程序进行相关设置，执行“视图”菜单中的命令，可以打开或关闭相应的窗口。

4、运行示例程序
演示“泡沫”、“飞舞的蝴蝶”、“计算器”
一、 分析示例程序“欢迎”
该程序由一个标签控件，一个命令按钮控件组成 二、 编写“欢迎”程序
1、设计程序界面
创建新工程
设计窗体：一个标签控件，一个命令控件
2、修改对象属性
3、编写代码
Private sub comma nd1_click() End End sub
4、 调试并保存程序
5、 生成可执行文件
1、编写一个“自我介绍”的程序
这节课我们学习了 vb 程序设计的一般步骤：设计界面，修改属性，编写代
教学过程
形成性测 试
设计窗体：两个标签控件，两个个命令控件，一个文本框控件2、修改对象属性
3、编写代码
Private sub cmdexit_click()
End
End sub
Private sub cmdok_click()
二false
二false
=+
=true
3 、编写代码
打幵代码窗口，编写如下代码:
Private Sub cmdExit_Click()
End
End Sub
Private Sub optHt_Click()
="黑体"
End Sub
Private Sub optLs_Click()
="隶书"
End Sub
Private Sub optSt_Click()
="宋体"
End Sub
3、设计程序“文本编辑器”
1、 设计程序界面 1.1 创建新工程
绘制窗体界面：一个文本框
1、修改对象属性
前提诊测 导入新课 教学方法 教学重点 教学难点 教学过
了解用菜单命令控制程序的过程
2、能力目标: 的能力。

3、情感目标: 培养学生的观察能力、自我探索、自主学习的能力和团体协作
通过具体实例，让学生自我展示、自我激励、体验成功，在不
断尝试中激发求知欲，在不断摸索中陶冶情操。

1、vb 中选项按钮用于什么条件下
我们常用的软件大多都有菜单项，今天我们就来学习如何编写菜单 任务驱动法、演示操作法 菜单编辑器 菜单设计
、分析示例程序“文本编辑器”
的能力。

3、情感目标：通过具体实例，让学生自我展示、自我激励、体验成功，在不
断尝试中激发求知欲，在不断摸索中陶冶情操。

在vb 程序中经常见到图片出现，今天我们就来学习如何在 vb 中使用图片框
二、设计程序“公园四景”
1 、设计程序界面
创建新工程 绘制窗体界面：一个图片框、四个选项按钮
2
、修改对
象属性
对象
属性
属性值
Frm1
Capti on 公园四景
borderstyle
1-fixed sin gle picturebox （名称） picgarde n opti on1
（名称）
opt1
Capti on
草原八骏
opti on2
（名称）
Opt2
Capti on
水关新意
opti on3
（名称）
Opt3
前提诊测
1、vb 中制作菜单要用到什么工具
导入新课 教学方法 任务驱动法、演示操作法
教学重点 选项按钮控件、loadpicture （）函数 教学难点 编写代码、调试程序
教学过
、分析示例程序“公园四景”
Capti on
大都庆典
opti on4
（名称）
Opt4
Capti on
鞍缰盛世
、编写程序代码
Private Sub Opt1_Click() =LoadPicture("d:\vblmage\") End Sub
Private Sub Opt2_Click() =LoadPicture("d:\vbImage\") End Sub
Private Sub Opt3_Click() =LoadPicture("d:\vbImage\") End Sub
Private Sub Opt4_Click() =LoadPicture("d:\vbImage\") End Sub
2、 调试并保存程序
3、 生成可执行程序
本课重点介绍了 loadpicture （） 函数，其一般格式为：loadpicture （ “图像文 件名”）。

其中“图像文件名”应包含图像文件所在的路径，女口：
第七课使用图片框控件
形成性测
1、将选项按钮换为命令按钮，编写本科程序程序,
板书设计
教学方法任务驱动法、演示操作法
教学重点定时器控件、date （）、time （）函数
教学难点编写代码、调试程序
教学过、分析示例程序“显示日期和时间”
二、设计程序“显示日期和时间”
1 、设计程序界面
创建新工程
绘制窗体界面：四个标签控件、一个命令按钮控件、一个定时器控件
2、修改对象属性
3、编写程序代码
对象属性属性值
Frm1（名称）Frmdisplay
capti on显示数值
Borderstyle1-fixed sin gle Label1capti on小
Label2capti on大
Label3capti on当前数值是：HscrolH（名称）hsbdisplay
Min0
Max100
Largechange10
text1（名称）Txtdisplay
text
3、编写程序代码
Private Sub hsbDisplay_Cha
nge()
End Sub
4、调试并保存程序
5、生成可执行程序
形成性测板书设计
制作显示数值程序
这节课我们学习了滚动条控件的使用方法，希望大家课外熟悉它们。

第九课使用滚动条控件
2、修改对象属性
3、编写程序代码
Private Sub Form_Load()
3、编写程序代码
Private Sub cmdCal_Click()
Dim a As Sin gle, b As Sin gle, c As Sin gle
a = Val
b = Val
c = Val。