单选按钮复选按钮框架列表框组合框控件的用法.docx
- 文档编号:9435658
- 上传时间:2023-05-19
- 格式:DOCX
- 页数:17
- 大小:335.50KB
单选按钮复选按钮框架列表框组合框控件的用法.docx
《单选按钮复选按钮框架列表框组合框控件的用法.docx》由会员分享,可在线阅读,更多相关《单选按钮复选按钮框架列表框组合框控件的用法.docx(17页珍藏版)》请在冰点文库上搜索。
单选按钮复选按钮框架列表框组合框控件的用法
单选按钮、复选按钮、框架、列表框、组合框控件的用法
——余姚四职校黄素媛汪群妃
[教学目标]
1.知识目标:
掌握单选按钮、复选按钮、框架、列表框、组合等控件的常用属性和方法,并能使用这些控件进行简单编程。
2.能力目标:
增产学生的知识理解能力、动手操作能力、团队合作精神。
3.情感目标:
加强对学生的热爱祖国、热爱科学的教育。
[教学重点]
1、掌握单选按钮、复选按钮、框架、列表框、组合等控件的常用属性和方法。
2、学会使用这些控件进行简单编程
[教学难点]
1、学会使用这些控件进行编程
[教学方法]
1.教法;
情境教学法、任务驱动法、比较法
2.学法:
以完成任务为动力,学生通过经验分析并结合实践操作,采用小组合作进行探究学习。
[教学手段]
采用多媒体课件演示,机房实践操作为主,教师适时点拔的教学手段。
[教具准备]
教学课件多媒体机房电子教室控制系统
[教学说明]
本课是在教科书的第五章,学生已经初步接触了VB,而且已经学过部分控件的用法,比如:
标签、命令按钮、文本框等,对VB代码的编写也已经接触了一段时间。
本课我们总共用二课时完成
[教学过程]
一、复习导入
[情景设置]
小叮当:
期中考试快要到了,每次期中考试都有5个班级的试卷要批,累都累死了
小磨菇:
你教那么多班级呀,那是挺累的,那你可以用VB编一个考试系统,让计算机帮你批呀,学生一考完,马上就有结果
小叮当:
是呀,我怎么没有想到呢?
可是我刚接触VB还不会编呀?
小磨菇:
我来教你吧,首先我们来掌握一些重要用到的重要控件的用法。
先作些准备工作吧
[复习]
(1)、命令按钮、标签控件的用法
(2)、说出下列程序的含义
Text1.Alignment=0
设置文本左对齐
Text1.Alignment=1
设置文本右对齐
Text1.Alignment=2
设置文本居中齐
Text1.FontSize=10
设置文本为10号字。
Text1.FontBold=False
设置文本为非粗体
label4.caption=“对不起,你答错了”
设置LABEL4的Caption属性为“对不起,你答错了”
msgbox(“对不起,你答错了”)
产生一个提示框
二、教授新课
(一)例题
1、演示例题
[教师活动]演示《例单项选择与多项选择》
[设问1]:
说出其中的新控件
[教师活动]:
教师引导,学生说出新控件:
单选按钮、复选按钮、框架
2、讲解例题(通过对例题的讲解,让学生初步接触三个控件的用法)
[第一步]:
界面设计
(1)、画框架
[教师活动]教学生有关框架的知识点
①、功能:
用来放其他控件的容器,把有关控件按功能分组,默认名称为Frame1、Frame2、Frame3……。
②重要属性:
Caption属性:
框架标题
Enabled属性:
True(缺省值),允许对框架内的所有对象进行操作
False:
标题呈灰色,不允许对框架内的所有对象进行操作。
Visible属性:
True(缺省值):
框架及其控件可见。
Flase:
框架及其控件被隐含起来
[教师活动]演示并画出两个框架,名称分别为Frame1、Frame1,Caption分别为单项选择与多项选择
[学生活动]跟着老师画
(2)、添加一些LABEL控件,属性值如下:
标签名称
Caption值
Label1
1、神话《白蛇传》中,“白娘子盗仙草”中仙草是指下列哪种东西
Label2
2、下列哪种旅游胜地是中国的?
Label3
3、提示:
Label4
无
[设问1];下面我们来为工程添加标签控件,总共要添加几个标签控件,怎么添加呢?
[学生活动]学生自行完成这一步
[教师活动]教师巡视,并指导学生完成
(3)、添加单选按钮
[教师活动]教学生有关单选按钮的知识点
①、功能:
实现一种“单项选择”的功能,一组单选按钮控件提代一组彼此相互排斥的选项,任何时刻用户只能从中选择一个选项,被选中项目左侧圆圈中会出现一黑点。
②重要属性:
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、山药
0
Flase
[学生活动]跟着老师操作
(4)、添加复选按钮
[教师活动]教学生有关复选按钮的知识点
①、功能:
实现一种“多项选择”的功能。
一组检查框控件可以提供多个选项,它们彼此独立工作,所以用户可以同时选择任意多个选项,选择某一选项后,该控件将显示√,而清除此选项后,√消失。
2重要属性:
Caption、Alignment、Style与单选按钮相同
Value属性:
Value属性与单选按钮不同
单选按钮
复选框控件
True:
单选钮被选定
False:
单选钮未被选定(缺省值)
0-Unchecked:
未被选定
1--Checked:
选定
2--Grayed:
灰色,禁止选择
[设问1];单选按钮与复选按钮在功能与属性方面有什么区别?
[教师活动]演示并画出六复选按钮,属性设置分别如下:
复选按钮名称
Caption值
Alignment值
Vlaue属性
Check1
黄山
0
0
Check2
故宫
0
0
Check3
富士山
0
0
Check4
爱琴海
0
0
Check5
长城
0
0
Check6
中山林
0
0
[学生活动]跟着老师操作
(5)、添加命令按钮
[学生活动]学生创建一个命令按钮,CAPTION值为校对答案
[第二步]:
添加代码
(1)、双击Option1,添加如下代码
PrivateSubOption1_Click()
Label4.Caption="对不起,答错了!
"
EndSub
含义:
当单击OPTION1时,LABEL4中就显示“对不起,答错了!
”
[设问1];那么Option2、Option3、Option4该如何添加代码呢?
[学生活动]学生思考,并且完成上面的问题
[师生互动]在老师的提示下,不能够完全的学生继续完成代码的添加
(2)、双击“校对答案”按钮,添加如下代码
PrivateSubCommand1_Click()
IfCheck1.ValueAndCheck2.ValueAndCheck5.ValueAndCheck6.ValueAndCheck3.Value=FlASEAndCheck4.Value=FalseThen
MsgBox("恭喜你,答对了")
Else
MsgBox("对不起,答错了!
,正确答案是:
黄山、故宫、长城和中山林")
EndIf
EndSub
[教师活动]解释如上程序的含义
[师生互动]在老师的提示下,完成代码的添加
3、巩固练习
任务一:
例:
创建一个窗体Form1(Caption:
编辑字体的颜色和字形),在此窗体上创建2个框架控件Frame1(Caption:
字体颜色)和Frame2(Caption:
字体字形),再在窗体上建立一个文本框Text1(Text:
心想事成)。
在框架控件Frame1内建立由名为“红色”、“绿色”、“蓝色”组成的单选按钮数组,在框架控件Frame2内建立由名为“宋体”、“楷体”、“仿宋体”、“黑体”、“隶书”组成的单选按钮数组。
在框架控件Frame3内建立由名为“粗体”、“斜体”、“下划线”组成的复选框按钮数组。
编程解决:
点击有关单选按钮时,文本框内的文本会作出相对应的变化。
[学生活动]学生思考,并且完成上面的例题,做好后,题目上交到指定的目录下
[师生活动]教师在学生做题过程中进行巡视,发现学生的不足,等学生上交完后,抽取部分学生的练习进行分析讲解,并把普遍存在的问题进行详细讲解
(二)例题
1、演示例题
[教师活动]演示《例列表框和组合框》
[设问1]:
说出其中的新控件
[教师活动]:
教师引导,学生说出新控件:
列表框、组合框
2、讲解例题(通过对例题的讲解,让学生初步接触二个控件的用法)
[第一步]:
界面设计
(1)、添加标签
控件名称
属性值
Caption1
Caption为字体
Caption2
Caption为字号
Caption3
Caption为颜色
[设问1];下面我们来为工程添加标签控件,总共要添加几个标签控件,怎么添加呢?
[学生活动]学生自行完成这一步
[教师活动]教师巡视,并指导学生完成
(2)、添加列表框
[教师活动]教学生有关列表框的知识点
①、功能:
列表框控件提供一个选项列表,用户可以从中选择一项或多项。
如果列表框无法显示所有的选项,则ViualBasic将会自动在列表框上添加滚动条。
②重要属性:
Name属性:
设置在程序中调用列表框对象的名称
List属性:
设置或返回列表框控件的选项
Text属性:
存放列表框中被选定项的文本内容
ListIndex属性:
设置或返回列表框选项的序号。
其中0表示第1个选项,1代表第2个选项
ListCount属性:
返回列表框中选项的数目
[教师活动]演示并画出一个列表框,并在其List属性中添加一些项目,内容为八荣八耻,如上图所示
[学生活动]跟着老师画
[设问1];列表框与组合框在功能与属性方面有什么联系和区别?
(3)、添加组合框
[教师活动]教学生有关组合框的知识点
①功能:
组合框是一个文本框和一个列表框的组合。
若用户在列表框中选择某项,则该项的内容会自动装入文本框中。
当列表框中没有所需项时,下拉式组合框和简单组合框都允许在文本框中输入特定的信息。
②重要属性:
Style属性:
设置组合框的样式
Text属性:
存放组合框中选定的内容
ListIndex属性:
设置或返回组合框选项的序号
List属性:
设置或返回组合框控件的选项
ListCount属性:
返回组合框中的选项数目
[教师活动]演示并画出三个组合框,属性设置分别如下:
组合框名称
List值
Combo1
宋体、黑体、隶书、幼圆、华文楷体
Combo2
10、11、12、13、14、15、16
Combo3
黄色、红色、蓝色、青色、绿色、紫色、黑色
[学生活动]跟着老师操作
[第二步]:
添加代码
(1)、双击Combo1,添加如下代码
PrivateSubCombo1_Click()
List1.FontName=Combo1.Text
EndSub
含义:
当单击Combo1时,List1中文字的字体就是Combo1中选择的字体
[设问1];那么Option2、Option3、Option4该如何添加代码呢?
[学生活动]学生思考,并且完成上面的问题
[师生互动]在老师的提示下,不能够完全的学生继续完成代码的添加
[教师活动]解释如上程序的含义
[师生互动]在老师的提示下,完成代码的添加
(三)综合例题(综合单选框、复选框、框架、列表框和组合框的用法)
1、演示例题
[教师活动]演示《例在线报名》
2、讲解例题(通过对例题的讲解,让学生对新学习的控件有一个综合的印象)
[第一步]:
界面设计
(1)、添加标签、文本框、框架、单选框、复选框、列表框和组合框
任务二:
学生按照上图完成和控件的添加以及属性值的设置
[学生活动]学生自行完成这一步
[教师活动]教师巡视,并指导学生完成
(2)添加命令按钮
Command1和Command2两个按钮的属性设置如下:
按钮名称
属性值
Command1
Style属性为1,Picture属性中添加图片
Command2
Style属性为1,Picture属性中添加图片
(3)再添加一个窗体Form2,当单击提交按钮时,用来显示在线报名的基本信息,如下图
[第二步]:
添加代码
(1)、在From1中的代码如下:
PrivateSubCommand1_Click()
IfList1.Text<>""Then
List2.AddItemList1.Text
EndIf
EndSub
PrivateSubCommand2_Click()
IfList2.Text<>""Then
List2.RemoveItemList2.ListIndex
EndIf
EndSub
PrivateSubCommand3_Click()
Form1.Hide
Form2.Show
EndSub
PrivateSubCommand4_Click()
Text1.Text=""
Combo1.Text="男"
Option1.Value=True
Check1.Value=False
Check2.Value=False
Check3.Value=False
List2.Clear
Text2.Text=""
EndSub
[教师活动]解释如上程序的含义
[师生互动]在老师的提示下,完成代码的添加
(2)、在From2中的代码如下:
PrivateSubForm_Activate()
Print"姓名:
";Form1.Text1.Text
Print"性别:
";Form1.Combo1.Text
IfForm1.Option1.ValueThen
Print"学历:
";Form1.Option1.Caption
ElseIfForm1.Option2.ValueThen
Print"学历:
";Form1.Option2.Caption
ElseIfForm1.Option3.ValueThen
Print"学历:
";Form1.Option3.Caption
ElseIfForm1.Option4.ValueThen
Print"学历:
";Form1.Option4.Caption
EndIf
b="语言能力:
"
IfForm1.Check1.Value=1Then
b=b+Form1.Check1.Caption+""
EndIf
IfForm1.Check2.Value=1Then
b=b+Form1.Check2.Caption+""
EndIf
IfForm1.Check3.Value=1Then
b=b+Form1.Check3.Caption
EndIf
Printb
Print"您的Email:
";Form1.Text2.Text
EndSub
PrivateSubForm_Unload(CancelAsInteger)
Form2.Hide
Form1.Show
MsgBox("恭喜您,报名成功!
")
EndSub
[教师活动]解释如上程序的含义
[师生互动]在老师的提示下,完成代码的添加
三、总结
(1)单选按钮的功能,重要属性的含义与设置,以及它的应用
(2)复选按钮的功能,与单选按钮的区别,重要属性的含义与设置,以及它的应用
(3)框架的应用
(4)组合框与列表框的重要属性的含义与设置,以及它们的应用
(5)综合使用单选按钮、复选按钮、框架、组合框与列表框
四、作业
(1)
如下图,当点击红灯时,旁边的图片就呈现现红灯,当点击绿灯时,旁边的图片就呈现绿灯(红灯与绿灯分别如左图)
(1)大家经常使用QQ,一定对QQ的登录界面很熟悉吧,现在我们也来做一个登录界面,界面设计如下:
组合框即可以由用户输入,也可以单击倒三角形自己选择,密码自己输入,单击确定按钮,如果密码正确则出现提示框“密码正确”,否则则出现提示框“密码错误”,单击取消按钮则退出程序
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 按钮 复选 框架 列表 组合 控件 用法
![提示](https://static.bingdoc.com/images/bang_tan.gif)