单选按钮复选按钮框架列表框组合框控件的用法.docx
《单选按钮复选按钮框架列表框组合框控件的用法.docx》由会员分享，可在线阅读，更多相关《单选按钮复选按钮框架列表框组合框控件的用法.docx（13页珍藏版）》请在冰豆网上搜索。
单选按钮复选按钮框架列表框组合框控件的用法
单选按钮、复选按钮、框架、列表框、组合框控件的用法
——余姚四职校黄素媛汪群妃
1.知识目标：
掌握单选按钮、复选按钮、框架、列表框、组合等控件的常
用属性和方法，并能使用这些控件进行简单编程。
2・能力目标：
增产学生的知识理解能力、动手操作能力、团队合作精神。
3・情感目标：
加强对学生的热爱祖国、热爱科学的教育。
1、掌握单选按钮、复选按钮、框架、列表框、组合等控件的常用属性和方
法。
2、学会使用这些控件进行简单编程
1、学会使用这些控件进行编程
1.教法；
情境教学法、任务驱动法、比较法
2.学法：
以完成任务为动力，学生通过经验分析并结合实践操作，采用小组合作进行探究学习。
采用多媒体课件演示，机房实践操作为主，教师适时点拔的教学手段。
教学课件多媒体机房电子教室控制系统
本课是在教科书的第五章，学生已经初步接触了VB,而且已经学过部分控件的用法，比如：
标签、命令按钮、文本框等，对VB代码的编写也已经接触了一段时间。
本课我们总共用二课时完成
一、复习导入
小叮当：
期中考试快要到了，每次期中考试都有5个班级的试卷要批，累都累死了小磨菇：
你教那么多班级呀，那是挺累的，那你可以用VB编一个考试系统，让计算机帮你批呀，学生一考完，马上就有结果
小叮当：
是呀，我怎么没有想到呢？
可是我刚接触VB还不会编呀？
小磨菇：
我来教你吧，首先我们来掌握一些重要用到的重要控件的用法。
先作些准备工作吧
（1）、命令按钮.标签控件的用法
（2）、说出下列程序的含义
=0
设置文本左对齐
=1
设置文本右对齐
=2
设置文本居中齐
=10
设置文本为10号字。
=False
设置文本为非粗体
=“对不起，你答错了”
设置LABEL4的Caption属性为“对不起，你答错了”
msgboxC对不起，你答错了”）
产生一个提示框
二、教授新课
（一）例题
1＞演示例题
［教师活动］演示《例》
［设问1］:
说出其中的新控件
［教师活动］:
教师引导，学生说出新控件：
单选按钮、复选按钮、框架
2.讲解例题（通过对例题的讲解.让学生初步接触三个控件的用法）
（1）、画框架
［教师活动］教学生有关框架的知识点
①、功能：
用来放其他控件的容器，把有关控件按功能分组，默认名称为Frame1、Framc2、Frame3°
②重要属性：
Caption属性：
框架标题
Enabled属性:
True（缺省值），允许对框架内的所有对象进行操作
False：
标题呈灰色.不允许对框架内的所有对象进行操作。
Visible属性:
True（缺省值）：
框架及其控件可见。
Rase：
框架及其控件被隐含起来
［教师活动］演示并画出两个框架，名称分别Frame1.Frame1,Caption分别为单项选择与多项选择
［学生活动］跟着老师画
（2）、添加一些LABEL控件，属性值如下:
标签名称
Caption值
Label1
1、神话《白蛇传》中，“白娘子盗仙草”中仙草是指下列哪种东西
Label2
2、下列哪种旅游胜地是中国的？
Label3
3、提示:
Label4
无
［设问1］;下而我们来为工程添加标签控件，总共要添加几个标签控件,
怎么添加呢？
［学生活动］学生自行完成这一步
［教师活动］教师巡视，并指导学生完成
（3）、添加单选按钮
［教师活动］教学生有关单选按钮的知识点
1.功能：
实现一种“单项选择”的功能，一组单选按钮控件提代一组彼此相互排斥的选项，任何时刻用户只能从中选择一个选项，被选中项目左侧圆圈中会出现一黑点。
2重要属性：
Caption属性：
设置控件标题
Alignment属性：
0（缺省值）：
控件钮在左边，标题显示在右边
1：
控件钮在右边，标题显示在左边
Value属性：
True：
单选钮被选定。
Flase（缺省值）：
单选钮未被选泄
Style属性：
0（缺省值）：
标准方式
1：
图形方式
［教师活动］演示并画出四个单选按钮，属性设置分别如下：
单选按钮名称
Caption值
Alignment值
Vlaue属性
Option1
A.人参
0
FLase
Option2
B.冬虫夏早
0
Flase
Option3
C、灵芝
0
Flase
Option4
D、山药
（）
Flase
［学生活动］跟着老师操作
（4）、添加复选按钮
［教师活动］教学生有关复选按钮的知识点
1、功能：
实现一种“多项选择”的功能。
一组检査框控件可以提供多个选
项，它们彼此独立工作，所以用户可以同时选择任意多个选项，选择某一选项后，该控件将显示而淸除此选项后，J消失。
2重要属性：
Caption.AlignmentsStyle与单选按钮相同
Value属性：
Value属性与单选按钮不同
单选按钮
复选框控件
True:
单选钮被选定False:
单选钮未被选定（缺省值）
O-Unchecked：
未被选定
1-Checked：
选定
2-Grayed：
灰色，禁止选择
［设问11;单选按钮与复选按钮在功能与属性方而有什么区别？
［教师活动］演示并画出六复选按钮，属性设置分别如下:
复选按钮名称
Caption值
Alignmcnt值
Vlaue属性
Check1
黄山
0
0
Check2
故宫
0
0
Check3
富士山
0
0
Check4
爱琴海
0
0
Chcck5
长城
0
0
Check6
中山林
0
0
［学生活动］跟着老师操作
（5）、添加命令按钮
［学生活动］学生创建一个命令按钮，CAPTION值为校对答案
（1）、双击Option1,添加如下代码
PrivateSubOptionl_Click（）■'对不起，答错了！
"
EndSub
含义：
当单击0PTION1时，LABEL4中就显示“对不起，答错了！
”
［设问1］;那么Option2>Option3>Option4该如何添加代码呢？
［学生活动］学生思考，并且完成上面的问题
［师生互动］在老师的提示下，不能够完全的学生继续完成代码的添加
（2）、双击“校对答案”按钮，添加如下代码
PrivateSubCommandl_Click（）
IfAndAndAndAnd=F1ASEAnd=FalseThen
MsgBox（,f恭喜你,答对了J
Else
MsgBoxC对不起，答错了！
，正确答案是：
黄山、故宫、长城和中山林J
EndIf
EndSub
［教师活动］解释如上程序的含义
［师生互动］在老师的提示下，完成代码的添加
3、巩固练习
任务一：
例：
创建一个窗体Forml（Caption：
编借字体的颜色和字形），任此窗体上创建2个框架控件Framel（Caption：
字体颜色）和Frame2（Caption：
字体字形），再在窗体上建立一个文本框Textl（Text：
心想事成）。
在框架控件Framel内建立由需为红色绿色”、"蓝色”组成的单选按钮数组，在框架控件Frame2内建立由需为^宋体S常体”「仿宋体”「黑体”「隶书”组成的单选按钮数组。
在框架控件Frame3内建立由名为“粗体”、“斜体J“下划线”组成的复选框按钮数组。
编程解决：
点击有关单选按钮时，文本框内的文本会作出相对应的变化。
［学生活动］学生思考，并且完成上而的例题，做好后，题目上交到指泄的目录下
［师生活动］教师在学生做题过程中进行巡视，发现学生的不足，等学生上交完后，抽取部分学生的练习进行分析讲解，并把普遍存在的问题进行详细讲解
（二）例题
1、演示例题
［教师活动］演示《例》
［设问说出其中的新控件
［教师活动］:
教师引导，学生说出新控件：
列表框、组合框
2>讲解例题（通过对例題的讲解•i上学生初步接触二个控件的用法）
（1）、添加标签
控件名称
属性值
Caption1
Caption为字体
Caption2
Caption为字号
Caption3
Caption为颜色
［设问1］;下而我们来为工程添加标签控件，总共要添加几个标签控件，怎么添加呢？
［学生活动］学生自行完成这一步
［教师活动］教师巡视，并指导学生完成
（2）、添加列表框
［教师活动］教学生有关列表框的知识点
1.功能：
列表框控件提供一个选项列表，用户可以从中选择一项或多
项。
如果列表框无法显示所有的选项，则ViualBasic将会自动在列表框上添加滚动条。
2重要属性：
Name属性：
设宜在程序中调用列表框对象的劣称
List属性：
设置或返回列表框控件的选项
Text属性：
存放列表框中被选左项的文本内容
Listindex属性：
设置或返回列表框选项的序号。
英中0表示第1个选项，1代表第2个选项
ListCoum属性：
返回列表框中选项的数目［教师活动］演示并画岀一个列表框，并在英List属性中添加一些项目，内容为八荣八耻，如上图所示
［学生活动］跟着老师画
［设问仁；列表框与组合框在功能与属性方而有什么联系和区别？
（3）、添加组合框
［教师活动］教学生有关组合框的知识点
①功能：
组合框是一个文本框和一个列表框的组合。
若用户在列表框中选择某项，则该项的内容会自动装入文本框中匚当列表框中没
［第一步h界面设计
（1）、添加标签、文本框、框架、单选框、复选框、列表框和组合框
任务二：
学生按照上图完成和控件的添加以及属性值的设置
［学生活动］学生自行完成这一步
［教师活动］教师巡视，并指导学生完成
（2）添加命令按钮
Command1和Command?
两个按钮的属性设置如下：
按钮名称
属性值
Command1
Style属性为1,Picture属性中添加图片
Command2
Style属性为1,Picture属性中添加图片
（3）再添加一个窗体Form2,当单击提交按钮时，用来显示在线报名的基本信息，如下图
Form2
您所填的基本资料如下:
d中・・!
:
dd妇高力al.・汝•：
能晌
EndSub
PrivateSubCommand4_Click（）—Illi
=“男”
=True
=False
=False
=False
_11*1
EndSub丿
［教师活动］解释如上程序的含义
［师生互动］在老师的提示下，完成代码的添加
PrivateSubForm_Activate（）
Print
Print
Print
Print
PrintH姓名:
M性别:
”;Then
PrinL学历：
”；Then
PrinL学历Then
PrinL学历：
M;Then
Prim”学历：
H;If
bi语言能力：
”
If=1Then
b=b++MH
EndIf
If=1Then
b=b++MH
EndIf
If=1Then
b=b+If
Printb
PrintH您的Email：
Sub
PrivateSubForm_UnIoad（CancelAsInteger）
MsgBoxC恭喜您，报名成功！
，J
EndSub
〔教师活动］解释如上程序的含义
［师生互动］在老师的提示下.完成代码的
升级会员 