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

单选按钮、复选按钮、框架、列表框、组合框控件的用法 余姚四职校 黄素媛 汪群妃教学目标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值Label11、神话白蛇传中，“白娘子盗仙草”中仙草是指下列哪种东西Label22、下列哪种旅游胜地是中国的？Label33、提示：Label4无 设问1；下面我们来为工程添加标签控件，总共要添加几个标签控件，怎么添加呢？ 学生活动 学生自行完成这一步 教师活动 教师巡视，并指导学生完成 （3）、添加单选按钮教师活动 教学生有关单选按钮的知识点、功能：实现一种“单项选择”的功能，一组单选按钮控件提代一组彼此相互排斥的选项，任何时刻用户只能从中选择一个选项，被选中项目左侧圆圈中会出现一黑点。 重要属性： Caption属性：设置控件标题 Alignment属性： 0(缺省值)：控件钮在左边，标题显示在右边1：控件钮在右边，标题显示在左边 Value属性： True：单选钮被选定。 Flase（缺省值）：单选钮未被选定 Style属性： 0（缺省值）：标准方式 1： 图形方式 教师活动 演示并画出四个单选按钮，属性设置分别如下： 单选按钮名称Caption值Alignment值Vlaue属性Option1A、人参0FLaseOption2B、冬虫夏早0FlaseOption3C、灵芝0FlaseOption4D、山药0Flase 学生活动 跟着老师操作（4）、添加复选按钮教师活动 教学生有关复选按钮的知识点、功能：实现一种“多项选择”的功能。一组检查框控件可以提供多个选项，它们彼此独立工作，所以用户可以同时选择任意多个选项，选择某一选项后，该控件将显示，而清除此选项后，消失。 重要属性： Caption、Alignment、Style与单选按钮相同 Value属性：Value 属性与单选按钮不同 单选按钮复选框控件True: 单选钮被选定False: 单选钮未被选定（缺省值）0-Unchecked：未被选定1-Checked：选定2-Grayed：灰色，禁止选择 设问1；单选按钮与复选按钮在功能与属性方面有什么区别？ 教师活动 演示并画出六复选按钮，属性设置分别如下： 复选按钮名称Caption值Alignment值Vlaue属性Check1黄山00Check2故宫00Check3富士山00Check4爱琴海00Check5长城00Check6中山林00 学生活动 跟着老师操作 （5）、添加命令按钮 学生活动 学生创建一个命令按钮，CAPTION值为校对答案第二步：添加代码 （1）、双击Option1，添加如下代码 Private Sub Option1_Click()Label4.Caption = 对不起，答错了！End Sub含义：当单击OPTION1时，LABEL4中就显示“对不起，答错了！”设问1；那么Option2、Option3、Option4该如何添加代码呢？学生活动 学生思考，并且完成上面的问题师生互动 在老师的提示下，不能够完全的学生继续完成代码的添加 （2）、双击“校对答案”按钮，添加如下代码 Private Sub Command1_Click()If Check1.Value And Check2.Value And Check5.Value And Check6.Value And Check3.Value = FlASE And Check4.Value = False Then MsgBox (恭喜你，答对了)Else MsgBox (对不起，答错了！，正确答案是：黄山、故宫、长城和中山林)End IfEnd Sub 教师活动 解释如上程序的含义师生互动 在老师的提示下，完成代码的添加3、巩固练习 任务一：例：创建一个窗体Form1（Caption：编辑字体的颜色和字形），在此窗体上创建2个框架控件Frame1（Caption：字体颜色）和Frame2（Caption：字体字形），再在窗体上建立一个文本框Text1（Text：心想事成）。在框架控件Frame1内建立由名为“红色”、“绿色”、“蓝色”组成的单选按钮数组，在框架控件Frame2内建立由名为“宋体”、“楷体”、“仿宋体”、“黑体”、“隶书”组成的单选按钮数组。在框架控件Frame3内建立由名为“粗体”、“斜体”、“下划线”组成的复选框按钮数组。编程解决：点击有关单选按钮时，文本框内的文本会作出相对应的变化。 学生活动 学生思考，并且完成上面的例题，做好后，题目上交到指定的目录下师生活动 教师在学生做题过程中进行巡视，发现学生的不足，等学生上交完后，抽取部分学生的练习进行分析讲解，并把普遍存在的问题进行详细讲解（二）例题1、演示例题教师活动 演示例 列表框和组合框 设问1：说出 其中的新控件 教师活动 ：教师引导，学生说出新控件：列表框、组合框 2、讲解例题（通过对例题的讲解，让学生初步接触二个控件的用法）第一步：界面设计（1）、添加标签控件名称属性值Caption1Caption为字体Caption2Caption为字号Caption3Caption为颜色 设问1；下面我们来为工程添加标签控件，总共要添加几个标签控件，怎么添加呢？ 学生活动 学生自行完成这一步 教师活动 教师巡视，并指导学生完成（2）、添加列表框教师活动 教学生有关列表框的知识点、功能：列表框控件提供一个选项列表，用户可以从中选择一项或多项。如果列表框无法显示所有的选项，则Viual Basic将会自动在列表框上添加滚动条。 重要属性： Name属性：设置在程序中调用列表框对象的名称 List属性：设置或返回列表框控件的选项 Text属性：存放列表框中被选定项的文本内容 ListIndex属性：设置或返回列表框选项的序号。其中0表示第1个选项，1代表第2个选项 ListCount属性：返回列表框中选项的数目教师活动 演示并画出一个列表框，并在其List属性中添加一些项目，内容为八荣八耻，如上图所示 学生活动 跟着老师画 设问1；列表框与组合框在功能与属性方面有什么联系和区别？ （3）、添加组合框教师活动 教学生有关组合框的知识点 功能：组合框是一个文本框和一个列表框的组合。若用户在列表框中选择某项，则该项的内容会自动装入文本框中。当列表框中没有所需项时，下拉式组合框和简单组合框都允许在文本框中输入特定的信息。 重要属性： Style属性：设置组合框的样式 Text属性：存放组合框中选定的内容 ListIndex属性：设置或返回组合框选项的序号 List属性：设置或返回组合框控件的选项 ListCount属性：返回组合框中的选项数目 教师活动 演示并画出三个组合框，属性设置分别如下：组合框名称List值Combo1宋体、黑体、隶书、幼圆、华文楷体Combo210、11、12、13、14、15、16Combo3黄色、红色、蓝色、青色、绿色、紫色、黑色 学生活动 跟着老师操作 第二步：添加代码 （1）、双击Combo1，添加如下代码 Private Sub Combo1_Click()List1.FontName= Combo1.TextEnd Sub含义：当单击Combo1时，List1中文字的字体就是Combo1中选择的字体设问1；那么Option2、Option3、Option4该如何添加代码呢？学生活动 学生思考，并且完成上面的问题师生互动 在老师的提示下，不能够完全的学生继续完成代码的添加 教师活动 解释如上程序的含义师生互动 在老师的提示下，完成代码的添加（三）综合例题（综合单选框、复选框、框架、列表框和组合框的用法）1、演示例题教师活动 演示例 在线报名 2、讲解例题（通过对例题的讲解，让学生对新学习的控件有一个综合的印象）第一步：界面设计 （1）、添加标签、文本框、框架、单选框、复选框、列表框和组合框任务二：学生按照上图完成和控件的添加以及属性值的设置 学生活动 学生自行完成这一步 教师活动 教师巡视，并指导学生完成（2）添加命令按钮 Command1和Command2两个按钮的属性设置如下：按钮名称属性值Command1Style属性为1，Picture属性中添加图片Command2Style属性为1，Picture属性中添加图片（3）再添加一个窗体Form2，当单击提交按钮时，用来显示在线报名的基本信息，如下图第二步：添加代码 (1)、在From1中的代码如下：当单击Command1按钮时，那么List2增加一项 Private Sub Command1_Click()If List1.Text Then List2.AddItem List1.TextEnd IfEnd Sub当单击Command2按钮时，那么List2中删除所选中项Private Sub Command2_Click()If List2.Text Then List2.RemoveItem List2.ListIndexEnd IfEnd Sub当单击Command3按钮时，那么From1隐藏，而From2出现Private Sub Command3_Click()Form1.HideForm2.ShowEnd SubPrivate Sub Command4_Click()Text1.Text = 当单击Command4按钮时，那么，清除所设置的项Combo1.Text = 男Option1.Value = TrueCheck1.Value = FalseCheck2.Value = FalseCheck3.Value = FalseList2.ClearText2.Text = End Sub教师活动 解释如上程序的含义师生互动 在老师的提示下，完成代码的添加 (2)、在From2中的代码如下：Private Sub Form_Activate()PrintPrintPrintPrintPrint 姓名：; Form1.Text1.TextPrint 性别:; Form1.Combo1.TextIf Form1.Option1.Value Then Print 学历：; Form1.Option1.CaptionElseIf Form1.Option2.Value Then Print 学历：; Form1.Option2.CaptionElseIf Form1.Option3.Value Then Print 学历：; Form1.Option3.CaptionElseIf Form1.Option4.Value Then Print 学历：; Form1.Option4.CaptionEnd If b = 语言能力：If Form1.Check1.Value = 1 Then b = b + Form1.Check1.Caption +