《中职学校VB教案.doc》由会员分享，可在线阅读，更多相关《中职学校VB教案.doc（37页珍藏版）》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、Visual Basic 6。0教案授课班级：10级计算机及应用1班授课教师：学校教学设计表课次第 1 次2课时课型周次第 6 周授课日期年 月 日课题界面设计时钟封面教学目标知识目标熟悉VB6的集成开发环境；认识VB6的构成要素；技能目标了解对象属性的设置与应用；素质（情感、态度、价值观、职业核心能力）目标激发学生学习兴趣，培养学生的独立思考能力和判断能力。重点难点简单的菜单和工具栏的使用；对象、对象属性的概念；教学方法设计讲授法、讨论法教学内容、教学过程、及时间分配导入：Visual Basic是一种可视化、面向对象和采用事件驱动方式的结构化高级程序设计语言，能用于Windows环境下的各
2、种应用软件的开发，是目前较为流行的应用软件开发平台。一、Visual Basic构成要素1、对象与属性对象：现实生活中的对象就是人们所说的“东西” ，如：太阳系、太阳、月亮。Visual Basic中的对象有：窗体、标签、命令按钮等。属性:描述对象的特征的数据，如标签的Caption、Height、Width等。Visual Basic中对象属性使用方法：对象.属性=表达式如： Form1。Caption= ”第一个程序2、事件与过程事件：在Visual Basic中事先设置好的能被系统识别的动作。例如：用鼠标单击窗体的事件就是Click事件。事件过程:就是事件发生后，程序要去执行的代码。例如
3、，用鼠标单击窗体触发Click事件，程序将执行过程 Private Sub Form_Click（)中的代码，该过程称为事件过称。下面就是一个事件过程,如果用鼠标单击Command1按钮就会触发Command1的Click事件,程序要执行如下的事件过程。Private Sub Command_Click(） Text1.Text= ”Visual Basic程序设计End Sub3、方法:Visual Basic将内含的函数或者过程称为方法。如下是Form的方法：Form1。Print Hello,Visual Basic 6。0 ”教学活动1:认识VB的集成开发环境。学生通过看书、讨论，说出
4、VB集成开发环境包含哪些部分，各部分的作用是什么？教学活动2：演示程序-窗体颜色变化学生通过观看演示，小组讨论分析用VB开发应用程序需要的步骤。归纳得出步骤为：1。创建应用程序界面;2.设置属性；3编写代码。教学资源作业内容如何设置对象的属性?教学后记备注课次第 2 次2课时课型周次第 7 周授课日期年 月 日课题界面设计时钟封面教学目标知识目标标签的常用属性；技能目标了解标签对象属性的设置及应用；学会保存程序;素质（情感、态度、价值观、职业核心能力）目标激发学生学习兴趣，培养学生的团队协作能力和判断能力。重点难点标签的常用属性;属性的设置方法;教学方法设计项目教学法、讨论法、上机操作教学内容
5、、教学过程、及时间分配导入:对于Windows环境下的应用软件，一个漂亮而醒目的封面总会使软件充满魅力.比如Word2003简洁美观的封面,它给所有office的用户都留下了深刻的印象。教学活动1完成项目：时钟封面项目描述：学习制作一款应用软件的“封面（见书第2页），它是启动应用软件时,显示出的第一个界面，在该界面上一般显示软件名称、版本、版权等信息。学生对该项目进行分析,并实现。教师根据学生完成情况进行点评。相关知识介绍：标签:标签用于设计在用户界面上不能被使用者修改的只读的文字内容。标签的常用属性有:Alignment:标签的文字的对齐方式,0表示左边对齐，1表示右边对齐，2表示中间对齐；
6、AutoSize：可自动调节标签的大小。值为True时，标签的大小自动与文字的大小一致，值为False时标签的大小固定，不会随文字的大小的改变而改变;BackStyle：标签的背景是否透明。0表示透明,1表示背景不透明；Caption：标签上显示的文字。标签的事件使用较少。主要事件有：Click事件：单击标签触发Click事件。项目分析：软件界面上显示文本信息一般使用标签(Label）,本项目通过3个标签分别显示软件名称、版本和版权信息，而背景图片、图标和标题的“欢迎”文本通过设置窗体属性实现。所用控件：窗体、标签。所用属性：Caption、Font、Aligment、Picture、Back
7、Style、Icon项目实现步骤：1、 启动VB62、 添加文字3、 修饰文字4、 对齐文字5、 设置显示文字的内部名称6、 添加其余文字7、 对齐3个标签8、 设置窗体背景图片9、 设置文字透明背景10、改变窗体大小11、窗体的图标的更改12、窗体的名称和标题栏文字的设置13、运行程序14、保存程序15、生成可执行程序16、关闭VB6教学资源作业内容标签的常用属性及意义教学后记备注课次第 3 次2课时课型周次第 7 周授课日期年 月 日课题界面设计-关于时钟教学目标知识目标图片框控件的常用属性；窗体的常用属性；技能目标掌握设置窗体控件的方法;素质（情感、态度、价值观、职业核心能力）目标激发学
8、生学习兴趣，培养学生的自学能力、信息分析、理解问题能力。重点难点窗体的常用属性及设置；教学方法设计项目教学法、讨论法、上机操作教学内容、教学过程、及时间分配导入:在具有Windows风格的应用软件中,菜单栏的最后一个菜单一般是“帮助”菜单，其中都有一个“关于菜单命令。如WindowsXP操作系统中，“我的电脑的帮助菜单中有一个“关于Windows”菜单命令。教学活动1完成项目：关于时钟项目描述：“关于”是英文“About”的汉译。“关于”窗口与软件封面的区别是：软件封面是应用软件启动时出现，一般在应用软件主窗口启动后自动关闭；“关于窗口是用于应用软件运行之后向用户提供软件版本、授权等信息,一般
9、需要用户单击“关闭”按钮才能关闭窗口。学生对该项目进行分析，并实现。教师根据学生完成情况进行点评.项目分析:本项目是对前一项目“时钟封面”主要的区别是:增加了一个“关闭按钮和图片框，其次是增加了直线、标签及窗口标题栏的变化。项目实现：1、 添加图片；2、添加文字；3、添加线条;4、添加按钮；5、添加代码；6、设置窗体;7、运行程序;8、保存程序教学资源作业内容窗体的常用属性有哪些？教学后记备注课次第 4 次 2课时课型周次第 7 周授课日期年 月 日课题界面设计用户登录教学目标知识目标1、命令按钮、文本框的常用属性及事件;技能目标1、 掌握命令按钮、文本框控件的初步应用；素质（情感、态度、价值
10、观、职业核心能力）目标激发学生学习VB的热情;培养学生的自学能力，分析、理解问题能力。重点难点命令按钮、文本框的常用属性；命令按钮、文本框的应用；教学方法设计项目教学法、讨论法、上机操作教学内容、教学过程、及时间分配导入：为了管理用户个人信息,保护个人数据的安全，很多应用软件都要求用户提交账号和密码，这就需要一个用户登录的界面，比如QQ用户登录界面。教学活动1项目:制作一款“用户登录的窗口;项目描述：本项目要求用户输入账号和密码(输入时密码显示为“”）,单击“登录”按钮时，显示用户输入的信息（显示时用户密码以明码显示）学生讨论，并说出设计步骤。教师点评，并进行分析演示：本项目用文本框接受用户输
11、入的数据，“重填”按钮和“登录”按钮通过代码设置是否响应用户的操作（即可用性），窗口上部使用图像控件显示图像文件。知识点介绍：1、 文本框文本框主要用于在程序中改变显示的文字，文本框一般具有复制、剪切、删除、粘贴等编辑功能。文本框的常见属性有：Text：文本框中的文字;Multiline:值为True时，文本框可以多行显示,值为False时,文本框的文字以单行显示；PasswordChar：用于设置口令，如把文本框的PasswordChar属性设置为“，则在文本框中的任何字符都会显示为“*”,这样便于口令的保密.文本框的常见事件：Change：文本框的Text发生改变触发该事件；2、 命令按钮
12、命令按钮是Visual Basic中使用最频繁的控件之一，它的常用属性有：Name：窗体的名称属性；Caption：命令按钮的标题属性；Cancel：该属性的值有True和False，设置为true是，按“ESC键就等价于点击该按钮;Enabled:按钮是否有效,值为True时，表示按钮有效，值为False时表示该按钮无效；Style:按钮的样式。0表示标准样式，1表示图形样式；Visible:值为True时按钮显示，值为False时按钮在运行时不显示。最常见的事件有：Click事件：用鼠标单击按钮触发该事件.程序举例：I.设计界面在窗体中按照顺序添加Lable1、Text1、Label2、T
13、ext2、Command1和Command2,界面如图1-1所示.图11 程序界面II。设置属性 设置属性，设置Lable1的Caption为“User”、Lable2的Caption为“Password”、Command1的Caption为“确定E”、设置Command2的Caption为“S、设置Text1和Text2的Text为空,设置Text2的Passwordchar为“”。设置属性后的界面如图1-2所示.图12 设置属性后的界面教学资源作业内容教学后记备注课次第 5 次 2课时课型周次第 8 周授课日期年 月 日课题界面设计用户登录教学目标知识目标1、命令按钮、文本框的常用属性及事
14、件；2、认识代码窗口技能目标1、 学会代码的添加；素质（情感、态度、价值观、职业核心能力）目标激发学生学习VB的热情；培养学生的自学能力，分析、理解问题能力.重点难点代码的添加;教学方法设计项目教学法、讨论法、上机操作教学内容、教学过程、及时间分配导入：上节课通过设计“用户登录”窗口,相信对于该程序的界面设计有了一定的了解，本节课希望大家通过阅读教材，将代码添加进去，实现完整的程序.理解代码含义，并说明代码所完成的功能.回顾程序：I.设计界面在窗体中按照顺序添加Lable1、Text1、Label2、Text2、Command1和Command2，界面如图11所示。图1-1 程序界面II。设置
15、属性 设置属性,设置Lable1的Caption为“User、Lable2的Caption为“&Password、Command1的Caption为“确定&E”、设置Command2的Caption为“S”、设置Text1和Text2的Text为空,设置Text2的Passwordchar为“*”。设置属性后的界面如图1-2所示.图12 设置属性后的界面代码实现:III.编写代码编写代码如下:Private Sub Command1_Click() If Text1.Text = zs” And Text2。Text = ”123” Then MsgBox ”欢迎你” Else MsgBox
16、”非法用户” End IfEnd SubPrivate Sub Command2_Click(） Text1.Text = ” Text2.Text = ” Text1.SetFocusEnd SubIV.保存程序保存程序。V.运行程序运行程序,程序正确。学生交流讨论，并自己独立实现“用户登录”窗口的制作.教学资源作业内容制作一款“用户登录的窗口教学后记备注课次第 6 次 2课时课型周次第 8 周授课日期年 月 日课题界面设计-时钟教学目标知识目标1、日期和时间函数；2、语法的概念；技能目标初步掌握赋值语句及函数的用法；学会定时器、图形控件的初步应用;素质（情感、态度、价值观、职业核心能力）目
17、标培养学生协作精神、分析问题、解决问题能力.重点难点函数的用法教学方法设计项目教学法、讨论法、上机操作教学内容、教学过程、及时间分配导入：时钟不仅是一个显示时间的工具，对很多人来说，时钟更是管理时间的工具，所以,很多应用软件中都附带有时钟工具软件，如Windows操作系统中自带的“日期与时间工具里,就有一个简单的时钟。教学活动1项目描述：要求制作一款“时钟”软件。完成的时钟以图形动画和字符两种形式显示日期与时间。在后续章节中，可以对本项目的时钟做进一步的功能开发，如显示星期、定时闹钟等。学生对该项目进行分析，并实现。教师根据学生完成情况进行点评.项目分析：本项目使用图形控件画时钟的钟面，用直线
18、控件画时针、分针、秒针的指针，通过定时器的作用控制秒针、分针和时针的变化，日期和时间标签中要用到日期型函数。项目实现：1、 画钟面2、 添加标签3、 加入定时器4、 添加定时器代码5、 加入秒针6、 加入分针和时针7、 修改代码8、 设置窗体9、 保存程序相关知识：1、函数：函数是一种特定的运算，在程序中要使用一个函数时，只要给出函数名及参数,就能得到它的函数值,如sin（x)是求弧度值为x的正弦值的函数。在VB6中,一般函数由函数名和参数组成,参数需要外加括号.个别特殊的函数不需要参数时，可以直接给出函数名得到函数值,如Date函数得到当前计算机的日期值，Time函数得到当前计算机的时间值。
19、2、语法建立程序语句时必须遵从的构造规则称为语法。在输入语句的过程中，VB将自动对输入的内容进行语法检查,如果发现语法错误,将弹出一个信息框提示出错的原因.教学资源作业内容设计一时钟教学后记备注课次第 次 2课时课型周次第 8 周授课日期年 月 日课题简单程序设计-数值交换教学目标知识目标1、赋值语句技能目标初步掌握赋值语句的用法；素质（情感、态度、价值观、职业核心能力)目标培养学生分析问题、解决问题能力重点难点赋值语句的灵活应用教学方法设计讲授、讨论法、上机操作教学内容、教学过程、及时间分配导入方法及内容认识赋值语句:赋值语句的一般格式为：Let 名称=”是变量或属性的名称，“表达式”是指某
20、运算式。在使用赋值语句时，需注意以下几点：（1）赋值语句兼有计算与赋值的双重功能，它首先计算赋值号“=”右边表达式的值,然后把结果赋给赋值号左边的变量（或属性)。（2)赋值号“=”与数学上的等号意义是不一样的。(3)赋值号两边的数据类型必须一致,否则会出现“类型不匹配”错误。赋值语句语法：变量名对象的属性名=表达式功能：将表达式的值赋给指定的变量或对象的属性。说明：赋值语句在程序设计中的使用非常广泛,每一个赋值语句可以单独放在一行中，也可以将多条赋值语句放在一行中，但每一语句间必须用“：”冒号作为分隔符。【例】已知长和宽，求矩形的面积。设计步骤如下： 设计程序界面。选择“新建”工程，然后在窗体
21、中增加一个标签Label1，一个命令按钮Command1和一个文本框Text1。 设置对象属性。如表2。8所示。表2。8 属性设置对象属性属性值Label1Caption已知:长=5,宽=7Label2CaptionCommand1Caption则矩形面积= 编写事件代码。 命令按钮Command1的Click事件代码为：Private Sub Command1_Click()Dim a As Single,b As Single,area As Single a=5b=7area=a*bLabel2.Caption=Str(area）End Sub练习：书101页教学资源作业内容教学后记备注
22、课次第 次 2课时课型周次第 9 周授课日期年 月 日课题简单程序设计-数值交换教学目标知识目标1、赋值语句技能目标初步掌握赋值语句的用法;素质（情感、态度、价值观、职业核心能力)目标培养学生分析问题、解决问题能力重点难点赋值语句的灵活应用教学方法设计上机操作教学内容、教学过程、及时间分配导入方法及内容要求学生讨论分析并编程实现以下项目： 从键盘分别输入两个数据，单击“交换”按钮完成两个数值的交换。界面如下:教学资源作业内容教学后记备注课次第 次 2课时课型周次第 9 周授课日期年 月 日课题简单程序设计数值交换教学目标知识目标1、赋值语句技能目标初步掌握赋值语句的用法;素质（情感、态度、价值
23、观、职业核心能力）目标培养学生分析问题、解决问题能力重点难点赋值语句的灵活应用教学方法设计演示、学生讨论教学内容、教学过程、及时间分配导入方法及内容编程实现以下项目: 从键盘分别输入两个数据，单击“交换按钮完成两个数值的交换。分析：这是一个数值交换程序。分别在TEXT1和TEXT2中输入数值1和数值2，单击“交换”按钮，则text1中显示的是数值2，text2中显示的是数值1；单击“清除”按钮，则清除text1和text2中的内容；单击“结束按钮，退出该程序.首先通过赋值语句将数据从文本框中取出，用不同的变量来存放数据，交换后再放入到文本框中，然后通过单击按钮来实现计算、清空和结束的功能。演示
24、步骤如下：1、 创建界面2、 设置各对象的属性3、 编写代码4、 运行程序5、 保存界面如下：教学资源作业内容将窗体中的数值换成字符，该如何修改界面和代码？教学后记课次第 次 2课时课型周次第 9 周授课日期年 月 日课题简易文本编辑器教学目标知识目标变量及常量技能目标掌握变量、常量的声明及使用.素质（情感、态度、价值观、职业核心能力）目标培养学生协作精神、分析问题、解决问题能力重点难点变量、常量的声明及使用教学方法设计讲授、上机操作教学内容、教学过程、及时间分配导入方法及内容常量及变量：1. 常量常量声明格式：Public Private Const 常量名 as type=value2.
25、变量一、变量的命名规则1。 以字母或汉字开头,后可跟字母、数字或下划线组成。 2. 变量名最长为255个字符； 3. VB中不区分变量名的大小写；4。不能使用VB中关键字；二、声明变量有两种方式：显式声明和隐式声明.(1） 显式声明语法声明格式:Dim|Static|PublicPrivate As 数据类型语句功能:声明变量并分配存储空间。(2) 隐式声明语法声明格式：Dim 变量名 （或者不声明变量，而直接使用变量）3.2.3 变量作用域不同作用域变量的声明方式作用范围局部变量模块级变量公共变量声明方式Dim，StaticDim，PrivatePublic变量的声明位置过程内部模块的声明段
26、模块的声明段本模块中其他过程能否访问不能能能其他模块能否访问不能不能能三、应用举例1、说明下列语句的作用y=3*x3+5a=a+1 说明:先计算右边的值，然后再把计算结果赋给左边的变量2、例：计算圆的面积和周长1、设计界面和运行界面,如图所示。2、代码：Option Explicit - Private Sub Command1_Click（） Dim pi As Single， r As Single, l As Single， s As Single r = Val（t1.Text) pi = 3。14 l = 2 pi r s = pi * r 2 l1.Caption = Str(l）
27、 l2。Caption = Str（s) End Sub *注意* val（字符串)：把字符串转换为数值; str(数值)：把数值转换为字符串 输入的数据是字符型，转换成数值型才能进行计算；标签的Caption属性是字符型，所以输时又要把计算结果转换成字符型。教学资源作业内容教学后记备注课次第 次 2课时课型周次第 10 周授课日期年 月 日课题简易文本编辑器教学目标知识目标变量及常量技能目标掌握变量、常量的声明及使用。素质(情感、态度、价值观、职业核心能力）目标培养学生协作精神、分析问题、解决问题能力重点难点变量、常量的声明及使用教学方法设计上机操作教学内容、教学过程、及时间分配导入方法及内
28、容要求学生讨论并编程实现简易文本编辑器功能:本程序可以对文本框进行复制、剪切、粘贴、删除、清除等操作.界面如下:教学资源作业内容教学后记备注课次第 次 2课时课型周次第 10 周授课日期年 月 日课题简易文本编辑器教学目标知识目标变量及常量技能目标掌握变量、常量的声明及使用.素质（情感、态度、价值观、职业核心能力)目标培养学生协作精神、分析问题、解决问题能力重点难点变量、常量的声明及使用教学方法设计演示、学生讨论教学内容、教学过程、及时间分配导入方法及内容编程实现-简易文本编辑器功能：本程序可以对文本框进行复制、剪切、粘贴、删除、清除等操作。分析：这是一个简易文本编辑器。在TEXT1中选择需要
29、复制或剪切的内容，单击“剪切按钮可以实现剪切功能,单击“复制”按钮可以实现复制功能；然后将光标移动到需要粘贴的位置，单击“粘贴”按钮，即可把剪切或复制的内容粘贴到目标位置；单击“退出”按钮结束。在这个程序中，涉及文本编辑属性中的seltext属性，该属性是用来选定字符,如果没有字符被选定的话，就是空字符。剪切、复制和粘贴就是通过一个模块级变量来实现的.步骤演示：1、 创建用户界面2、 设置各对象属性3、 编写代码4、 运行程序5、 保存界面如下：教学资源作业内容如果再添加2个“全选”和“清空”按钮，应该如何修改窗体和代码？教学后记课次第 次 2课时课型周次第 10 周授课日期年 月 日课题简易
30、计算器教学目标知识目标算术运算符及表达式技能目标熟悉VB语言中表达式的使用素质（情感、态度、价值观、职业核心能力)目标培养学生协作精神、分析问题、解决问题能力重点难点表达式的应用教学方法设计讲授、上机练习教学内容、教学过程、及时间分配导入方法及内容表达式及运算符：1. 算术运算符及算术表达式(1)“/”和“”运算符的区别；（2）“MOD”运算符的运用（3） 写VB表达式时，要注意的几点；2. 字符运算符及字符表达式字符运算符用于将两个字符型表达式连接生成一个新字符串。其运符主要有“+”运算符和“&”运算符当两个表达式的其中一个是数值型时，“+”做为算术运算符进行加法运算，当两个表达式都是字符型
31、时,才做为连接运算符。3。 关系运算符及关系表达式 =4。 逻辑运算符及逻辑表达式NOTANDORXOREQVIMP5。 运算符的优先顺序在一个表达式中，如果同时有多个运算符存在，则它们的优先顺序由高到低依次为：算术运算符字符运算符关系运算符逻辑运算符算术运算符的优先级顺序由高到低依次为:（指数运算）；(负数）；*，/(乘法，浮点除法）；（整数除法）;Mod（取模运算）；+，(加法,减法）。其中,“，“/”具有相同的优先级；“+”，“-” 具有相同的优先级。在关系运算符中，所有的运算符具有相同的优先级。逻辑运算符的优先级顺序由高到抵依次为：Not（非），And（与），Or（或）,Xor（异或）
32、，Eqv（同或），Imp（蕴含)。用括号控制运算的优先次序可以是程序清晰易读，而且不易出错.例2。4 写出VB表达式4*637 Or Not 52的值。计算步骤如下： 算术运算：2421 Or Not 52 关系运算:True Or Not True 逻辑运算：True Or False 结果:True课堂练习：教学资源作业内容教学后记备注课次第 次 2课时课型周次第 11 周授课日期年 月 日课题简易计算器教学目标知识目标算术运算符及表达式技能目标熟悉VB语言中表达式的使用素质（情感、态度、价值观、职业核心能力）目标培养学生协作精神、分析问题、解决问题能力重点难点表达式的应用教学方法设计上机
33、操作教学内容、教学过程、及时间分配导入方法及内容要求学生讨论并编程实现-简易计算器功能:本程序要求从键盘分别输入两个数据，单击“开始按钮，就可以进行加、减、乘、除的四则运算。界面如下：教学资源作业内容教学后记备注课次第 次 2课时课型周次第 11 周授课日期年 月 日课题IF语句教学目标知识目标熟悉IfThen结构,IfThenElse结构技能目标能用if语句编写程序素质（情感、态度、价值观、职业核心能力）目标提高学生学习兴趣重点难点If语句的应用教学方法设计讲授、上机练习教学内容、教学过程、及时间分配导入方法及内容在程序设计中经常遇到这类问题,它需要根据不同的情况采用不同的处理方法。例如，一
34、元二次方程的求根问题，要根据判别式小于零或大于等于零的情况，采用不同的数学表达式进行计算。对于这类问题，如果用顺序结构编程，显然力不从心。必须借助分支结构。一、If语句格式：If条件then语句块1Else语句块2EndIf说明：（1）“条件一般为关系表达式或逻辑表达式。通常把关系表达式或逻辑表达式的值为真时，称为条件满足；值为假时，称为条件不满足。反之亦然。判断下列条件是否成立：1、10；2、1=0;3、1=3；5、3=30L1.caption=”此数的范围大于30”caseis=20L1.caption=”此数的范围大于20caseis=10L1。caption=”此数的范围大于10”endselect【例】输入一个学生的一门课分数x（百分制），当x90时，输出“优秀”;当80x90时，输出“良好”;当70x80时，输出“中”；当60x70时，输出“及格”,当x60时，输出“不及格。（1)界面设计(2)代码设计Private Sub Command1_Click（） Dim score！ score = val(Text1。Text） Select Case score Case Is = 90 Text2.Text = ”优秀” Case Is = 80 Text2.Text = ”良好 Case Is = 70 Text2。Text = 中”