单选按钮复选按钮框架列表框组合框控件的用法

1、单选按钮、复选按钮、框架、列表框、组合框控件的用法余姚四职校 黄素媛 汪群妃教学目标1. 知识目标：掌握单选按钮、复选按钮、框架、列表框、组合等控件的常用属性和方法，并能使用这些控件进行简单编程。2能力目标：增产学生的知识理解能力、动手操作能力、团队合作精神。3情感目标：加强对学生的热爱祖国、热爱科学的教育。教学重点1、掌握单选按钮、复选按钮、框架、列表框、组合等控件的常用属性和方法。2、学会使用这些控件进行简单编程教学难点1、学会使用这些控件进行编程教学方法1. 教法；情境教学法、任务驱动法、比较法2. 学法：以完成任务为动力，学生通过经验分析并结合实践操作，采用小组合作 进行探究学习。教学

2、手段采用多媒体课件演示，机房实践操作为主，教师适时点拔的教学手段。教具准备教学课件多媒体机房电子教室控制系统教学说明本课是在教科书的第五章，学生已经初步接触了 VB,而且已经学过部分 控件的用法，比如：标签、命令按钮、文本框等，对VB代码的编写也已经接 触了一段时间。本课我们总共用二课时完成教学过程一、复习导入情景设置小叮当：期中考试快要到了，每次期中考试都有5个班级的试卷要批，累都累死了 小磨菇：你教那么多班级呀，那是挺累的，那你可以用VB编一个考试系统，让计算机帮 你批呀，学生一考完，马上就有结果小叮当：是呀，我怎么没有想到呢？可是我刚接触VB还不会编呀？小磨菇：我来教你吧，首先我们来掌握

3、一些重要用到的重要控件的用法。先作些准备工作 吧复习（1）、命令按钮.标签控件的用法（2）、说出下列程序的含义=0设置文本左对齐=1设置文本右对齐=2设置文本居中齐=10设置文本为10号字。=False设置文本为非粗体=“对不起，你答错了”设置LABEL4的Caption属性为“对不起，你答错了”msgboxC对不起，你答错了”）产生一个提示框二、教授新课（一）例题1演示例题教师活动演示例设问1:说出其中的新控件教师活动:教师引导，学生说出新控件：单选按钮、复选按钮、框架2.讲解例题（通过对例题的讲解.让学生初步接触三个控件的用法）第一步:界面设计（1）、画框架教师活动教学生有关框架的知识点、

4、功能：用来放其他控件的容器，把有关控件按功能分组，默认名称 为 Frame 1、Framc2、Frame3°重要属性：Caption属性：框架标题Enabled 属性:True（缺省值），允许对框架内的所有对象进行操作False：标题呈灰色.不允许对框架内的所有对象进行操作。Visible 属性:True（缺省值）：框架及其控件可见。Rase：框架及其控件被隐含起来教师活动演示并画出两个框架，名称分别Frame 1. Frame 1, Caption分 别为单项选择与多项选择学生活动跟着老师画（2）、添加一些LABEL控件，属性值如下:标签名称Caption 值Label 11、神话

5、白蛇传中，“白娘子盗仙草”中仙草是指下列哪 种东西Label22、下列哪种旅游胜地是中国的？Label33、提示:Label4无设问1;下而我们来为工程添加标签控件，总共要添加几个标签控件,怎么添加呢？学生活动学生自行完成这一步教师活动教师巡视，并指导学生完成（3）、添加单选按钮教师活动教学生有关单选按钮的知识点 .功能：实现一种“单项选择”的功能，一组单选按钮控件提代一 组彼此相互排斥的选项，任何时刻用户只能从中选择一个选项，被 选中项目左侧圆圈中会出现一黑点。 重要属性：Caption属性：设置控件标题Alignment 属性：0（缺省值）：控件钮在左边，标题显示在右边1：控件钮在右边，标

6、题显示在左边Value属性：True：单选钮被选定。Flase （缺省值）：单选钮未被选泄Style属性：0 （缺省值）：标准方式1：图形方式教师活动演示并画出四个单选按钮，属性设置分别如下：单选按钮名称Caption 值Alignment 值Vlaue属性Option 1A.人参0FLaseOption2B.冬虫夏早0FlaseOption3C、灵芝0FlaseOption4D、山药()Flase学生活动跟着老师操作（4）、添加复选按钮教师活动教学生有关复选按钮的知识点 、功能：实现一种“多项选择”的功能。一组检査框控件可以提供多个选项，它们彼此独立工作，所以用户可以同时选择任意多个选项，选

7、择 某一选项后，该控件将显示而淸除此选项后，J消失。 重要属性：Caption. Alignments Style 与单选按钮相同Value属性：Value属性与单选按钮不同单选按钮复选框控件True:单选钮被选定 False:单选钮未被选 定（缺省值）O-Unchecked：未被选定1-Checked：选定2-Grayed：灰色，禁止选择设问11;单选按钮与复选按钮在功能与属性方而有什么区别？教师活动演示并画出六复选按钮，属性设置分别如下:复选按钮名称Caption 值Alignmc nt 值Vlaue属性Check 1黄山00Check2故宫00Check3富士山00Check4爱琴海00

8、Chcck5长城00Check6中山林00学生活动跟着老师操作（5）、添加命令按钮学生活动学生创建一个命令按钮，CAPTION值为校对答案第二步:添加代码（1）、双击Option 1,添加如下代码Private Sub Option l_Click（） '对不起，答错了！"End Sub含义：当单击0PTION1时，LABEL4中就显示“对不起，答错了！”设问1;那么Option2> Option3> Option4该如何添加代码呢？学生活动学生思考，并且完成上面的问题师生互动在老师的提示下，不能够完全的学生继续完成代码的添加（2）、双击“校对答案”按钮，添加如下

9、代码Private Sub Command l_Click（）If And And And And = F1ASE And = False ThenMsgBox （,f恭喜你,答对了JElseMsgBox C对不起，答错了！，正确答案是：黄山、故宫、长城和中山林JEnd IfEnd Sub教师活动解释如上程序的含义师生互动在老师的提示下，完成代码的添加3、巩固练习任务一：例：创建一个窗体Forml （Caption：编借字体的颜色和字形），任此窗体上 创建2个框架控件Framel （Caption：字体颜色）和Frame2 （Caption：字体字形），再 在窗体上建立一个文本框Textl （

10、Text：心想事成）。在框架控件Framel内建立由需为 红色绿色”、"蓝色”组成的单选按钮数组，在框架控件Frame2内建立由需为宋体S 常体”仿宋体”黑体”隶书”组成的单选按钮数组。在框架控件Frame3内建立由名 为“粗体”、“斜体J “下划线”组成的复选框按钮数组。编程解决：点击有关单选按钮时，文 本框内的文本会作出相对应的变化。学生活动学生思考，并且完成上而的例题，做好后，题目上交到指泄的目录下师生活动教师在学生做题过程中进行巡视，发现学生的不足，等学生上交完后，抽 取部分学生的练习进行分析讲解，并把普遍存在的问题进行详细讲解（二）例题1、演示例题教师活动演示例设问说出其中

11、的新控件教师活动:教师引导，学生说出新控件：列表框、组合框2>讲解例题（通过对例題的讲解 i上学生初步接触二个控件的用法）第一步h界面设计(1)、添加标签控件名称属性值Caption 1Caption为字体Caption2Caption为字号Caption3Caption为颜色字体：荣荣荣荣荣荣荣8为为为为为为为 民知劳己纪纪逸 人无恶利乱乱淫 离昧逸人法法奢 背愚好损违违骄 la以以以以以以以字号：颜色:设问1;下而我们来为工程添加标签控件，总共要添加几个标签控件，怎么添加 呢？学生活动学生自行完成这一步教师活动教师巡视，并指导学生完成(2)、添加列表框教师活动教学生有关列表框的知识点

12、 .功能：列表框控件提供一个选项列表，用户可以从中选择一项或多项。如果列表框无法显示所有的选项，则Viual Basic将会自动在列 表框上添加滚动条。 重要属性：Name属性：设宜在程序中调用列表框对象的劣称List属性：设置或返回列表框控件的选项Text属性：存放列表框中被选左项的文本内容Listindex属性：设置或返回列表框选项的序号。英中0表示第1个选 项，1代表第2个选项ListCoum属性：返回列表框中选项的数目 教师活动演示并画岀一个列表框，并在英List属性中添加一些项目，内容 为八荣八耻，如上图所示学生活动跟着老师画设问仁；列表框与组合框在功能与属性方而有什么联系和区别？(

13、3) 、添加组合框教师活动教学生有关组合框的知识点功能：组合框是一个文本框和一个列表框的组合。若用户在列表框 中选择某项，则该项的内容会自动装入文本框中匚当列表框中没第一步h界面设计（1）、添加标签、文本框、框架、单选框、复选框、列表框和组合框任务二：学生按照上图完成和控件的添加以及属性值的设置学生活动学生自行完成这一步教师活动教师巡视，并指导学生完成（2）添加命令按钮Command 1和Command?两个按钮的属性设置如下：按钮名称属性值Command 1Style属性为1, Picture属性中添加图片Command2Style属性为1, Picture属性中添加图片（3）再添加一个窗体

14、Form2,当单击提交按钮时，用来显示在线报名 的基本信息，如下图Form2您所填的基本资料如下:d中!: dd妇高力al .汝：能晌第二步:添加代码(l)x在Froml中的代码如下:Private Sub Command l_Click()If o " ThenEnd IfEnd SubPrivate Sub Command2_Click()If <> 卄 ThenEnd IfEnd SubPrivate Sub Command3_Click() -当单击Command 1按钮时, 那么List2增加一项当单击Command2按钮时，那么List2中删除所选中项End

15、SubPrivate Sub Command4_Click() Illi=“男”=True=False=False=False当单击Conimand3按钮时， 那么From 1隐藏，而From2 出现当单击Command4按钮时,那么，清除所设置的项_ 11*1End Sub丿教师活动解释如上程序的含义师生互动在老师的提示下，完成代码的添加(2)、在From2中的代码如下：Private Sub Form_Activate()PrintPrintPrintPrintPrintH姓名:M性别:”;ThenPrinL学历：”；ThenPrinL学历ThenPrinL学历：M; ThenPrim”学

16、历：H; Ifbi语言能力：”If = 1 Thenb = b + + M HEnd IfIf = 1 Thenb = b + + M HEnd IfIf = 1 Thenb = b+ IfPrint bPrintH您的 Email： SubPrivate Sub Form_UnIoad(Cancel As Integer)MsgBox C恭喜您，报名成功！，JEnd Sub教师活动解释如上程序的含义师生互动 在老师的提示下.完成代码的添加三、总结（1）单选按钮的功能，重要属性的含义与设宜，以及它的应用（2）复选按钮的功能，与单选按钮的区别，重要属性的含义与设置，以及它的应 用（3）框架的应用（