VB教案-单选按钮与框架
vb实验七单选按钮、复选框、列表框和组合框实验报告
电子信息工程学系实验报告课程名称：面向对象程序设计实验项目名称：单选按钮、复选框、列表框和组合框 实验时间：班级： 姓名： 学号：一 实 验 目 的:1） 掌握单选按钮和复选框的使用。
2） 掌握列表框的使用。
3） 掌握组合框的使用。
4） 区别几种控件的使用场合。
二 实 验 环 境:Windows XPVisual 2003三 实 验 内 容 过 程 及 结 果 分 析:一 复选框与列表框、组合框联动1.创建界面创建一个工程，由一个窗体组成，界面如下图所示，选择任意一个爱好，将自动想listbox 和combobox中添加一个爱好。
选择一个样式表，将改变combobox 的dropdownstyle 属性。
设计界面2.设计各对象属性可以利用属性窗口给listbox 或combobox 的items 属性添加列表项，单击items 右边的按钮，将出现字符串集合编辑器，可以在其中预选定义列表项。
列表框和组合框的items属性设定界面3.设计各对象的事件代码设计checkbox的事件代码，使用户选择任意一个爱好时，向listbox和combobox中添加该爱好项，当用户不选择中某一爱好时，能移除该爱好。
Private Sub CheckBox1_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChangedIf CheckBox1.Checked ThenListBox1.Items.Add(CheckBox1.Text)ComboBox1.Items.Add(CheckBox1.Text)ElseListBox1.Items.Remove(CheckBox1.Text)ComboBox1.Items.Remove(CheckBox1.Text)End IfEnd SubPrivate Sub CheckBox2_CheckedChanged(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles CheckBox2.CheckedChangedIf CheckBox2.Checked ThenListBox1.Items.Add(CheckBox2.Text)ComboBox1.Items.Add(CheckBox2.Text)ElseListBox1.Items.Remove(CheckBox2.Text)ComboBox1.Items.Remove(CheckBox2.Text)End IfEnd SubPrivate Sub CheckBox3_CheckedChanged(ByVal sender As System.Object, ByVal e AsSystem.EventArgs) Handles CheckBox3.CheckedChangedIf CheckBox3.Checked ThenListBox1.Items.Add(CheckBox3.Text)ComboBox1.Items.Add(CheckBox3.Text)ElseListBox1.Items.Remove(CheckBox3.Text)ComboBox1.Items.Remove(CheckBox3.Text)End IfEnd SubPrivate Sub CheckBox4_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox4.CheckedChangedIf CheckBox4.Checked ThenListBox1.Items.Add(CheckBox4.Text)ComboBox1.Items.Add(CheckBox4.Text)ElseListBox1.Items.Remove(CheckBox4.Text)ComboBox1.Items.Remove(CheckBox4.Text)End IfEnd SubPrivate Sub CheckBox5_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox5.CheckedChangedIf CheckBox5.Checked ThenListBox1.Items.Add(CheckBox5.Text)ComboBox1.Items.Add(CheckBox5.Text)ElseListBox1.Items.Remove(CheckBox5.Text)ComboBox1.Items.Remove(CheckBox5.Text)End IfEnd SubPrivate Sub CheckBox6_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox6.CheckedChangedIf CheckBox6.Checked ThenListBox1.Items.Add(CheckBox6.Text)ComboBox1.Items.Add(CheckBox6.Text)ElseListBox1.Items.Remove(CheckBox6.Text)ComboBox1.Items.Remove(CheckBox6.Text)End IfEnd SubPrivate Sub CheckBox7_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox7.CheckedChangedIf CheckBox7.Checked ThenListBox1.Items.Add(CheckBox7.Text)ComboBox1.Items.Add(CheckBox7.Text)ElseListBox1.Items.Remove(CheckBox7.Text)ComboBox1.Items.Remove(CheckBox7.Text)End IfEnd Sub设计radiobutton的事件代码，使用户选择样式时，能改变combobox的dropdownstyle属性。
工程编程软件VB课件教程-单选按钮复选框和框架
特别说明：要使标题包含连字符但不创建快捷访问键，就 应使标题包含两个连字符（&&）。这样，标题中将显示一 个连字符（&），而且没有字符带下划线。
每个单选项的左边都有一个圆圈“○”，当某一项被选 定后，圆圈中出现一个黑点“⊙”，此时其它选项自动关 闭。通常单选项按钮都是成组出现的，为了把几个单选按钮 编成一组，可以把一组OptionButton放到具有容器性质的 控件中，如框架、图片框和窗体。
复选框的Value属性 复选框的Value属性用于设置复选框是否处于选中状态。 未选中时值为0 — vbUnChecked ，选中时， Value值为1 — vbChecked，此外还能使复选框变成灰色（Value值为2 — vbGrayed 。
特别注意：设置复选框的Value值为2 — vbGrayed，使 复选框变成灰色，仅造成复选框颜色的改变，不代表该复 选框不可用（这和将复选框的Enabled属性设置为False 使复选框变成灰色是不同的）。
10.1.1 创建单选按钮
1. 使用框架控件对单选按钮分组 当没有使用框架时，所有直接添加到窗体中的单选项总是 属于同一个组，用户只能选定其中的一个。在一些应用程序中 常常需要有多组选项，用户可在每组选项中作出一个选择。这 时，就需要使用到框架控件，用户可首先在窗体中设置几个框 架控件然后再将单选项控件放置在框架中，则处于同一框架中 的单选项属于同一组。 P118使用框架为单选项分组示例 使用框架对单选项的分组示例
Style
当Style属性值为1时，Picture属性用于设置选项按钮上显 示的图片 当Style属性值为1时，DownPicture属性用于设置选项按 DownPicture 钮被按下时（选中状态）显示的图片 DisabledPicture 当Style属性值为1时，DisablePicture属性用于设置选项无 效（Enabled属性值为False）时显示的图片 Picture Value 设置或返回单选项的状态，选中时为True
vb单选复选框架
是放置其它控件的容器。 1、属性： Caption：框架标题 Enabled： True：允许对框架内的对象进行 操作。 False：不允许对框架内的所有 对象进行操作。
2、框架内控件的创建方法： （1）先画框架 （2）选中控件后，在框架内拖放。
二、单选按钮(OptionButton)
1．属性： Caption：文本标题。 Alignment: 0：控件钮在左边，标题显示在右边。 1：控件钮在右边，标题显示在左边。 Value: True：选定 False：未选定
Style: 0--Standard：标准方式 1--Graphical：图形方式 Enable: True：可用 False：不可用 2.事例4：如果选择“女”，则单击“选择” 按钮后在窗体上打印“女”，否则打印 “男”。
Private Sub Command1_Click() If Option1.Value = True Then Print "男" Else Print "女"
End If
End Sub
Style 0--Standard：标准方式 1--Graphical：图形方式 2.事件 : Click
例6：
例7：单击“确定”按钮后在右面文 本框显示相应内容。
Private Sub Command1_Click() If Check1.Value = 1 Then Text1.Text = Text1.Text & Check1.Caption End If If Check2.Value = 1 Then Text1.Text = Text1.Text & Check2.Caption End If If Check3.Value = 1 Then Text1 = Text1 & Check3.Caption End If End Sub Private Sub Command2_Click() Text1.Text = "" End Sub
VB单选按钮复选框
事件：
框架可以响应的事件Click、DblClick 一般不需要有关框架的事件过程。
10-2 复选框
1. 用途
复选框（CheckBox）也称作检 查框、择框。一组检查框控件可 以提供多个选项，它们彼此独立
工作，所以用户可以同时选择任 意多个选项，实现一种“不定项 选择”的功能。选择某一选项后 ，该控件将显示√，而清除此选 项后，√消失。 复选框 2. 重要属性 Caption、Alignment、Style与单选钮相同
• 检查框的Value 属性与单选按钮不同，其值为数值型数 据，可取 0 , 1 , 2 检查框与单选按钮Value 属性的比较 单选钮 True: 单选钮被选定 False: 单选钮未被选定， 缺省设置
检查框 0--Unchecked：未被选定 1--Checked：选定 2--Grayed：灰色，禁止选择
一组单选钮控件钮控件可以提供一组彼此相提供组彼此相互排斥的选项任何时刻用户只能从中选择一个选项实现一种单项选择的功能被选中项目左侧圆圈中会出现一黑点
第十章
单选按钮、复选框和框架
本章内容及要求：
掌握常用控件单选钮(OptionButton)、复选框 (CheckBox)、 框架(Frame) 的常用属性、重要事件
和方法的使用；
本章重点：
常用控件单选钮、复选框、 框架的常用 属性、
重要事件和方法的使用；
本章难点：
常用系统对象的使用。
10.1 单选按钮和框架
10-1-1创建单选钮
1. 用途
单 选 钮 （ OptionButton ） 也称作选择按钮。一组单选 钮控件可以提供一组彼此相 互排斥的选项，任何时刻用 户只能从中选择一个选项， 实现一种“单项选择”的功 能，被选中项目左侧圆圈中 会出现一黑点。 单选按钮
VB第七章课件
MouseMove事件
Sub Form_MouseMove(Button As Integer, Shift As Integer,X As Single, Y As Single) （发生在窗体 上的事件过程）
MouseDown事件
Sub picture1_MouseDown(Button As Integer, Shift As Integer,X As Single, Y As Single)（发 生在图片框上的事件过程）
7.2Βιβλιοθήκη 通用对话框• VB的通用对话框Commondialog控件提供了一组基 于windows的标准对话框界面。 • 使用单个的通用对话框控件，可以显示文件打开、 另存为、颜色、字体、打印和帮助对话框，但这 些对话框仅仅用于返回信息，不能真正实现文件 打开、存储、颜色设置、字体设置和打印等操作， 如果想要实现这些功能必须编程解决。 • P174表（举例）
键盘
大多数情况下,用户只需使用鼠标器就可以操纵 windows应用程序,但是有时也需要用键盘进行 操作.主要事件有： 1.keypress:按下并且释放一个会产生ascII码的键 时被触发. 2.keydown:用户按下键盘上任意一个键时被触发. 3.keyup:用户释放键盘上任意一个键时被触发. (举例)
• 单选按钮,复选框,框架（88页）
第七章 用户界面设计
• 单选钮：必须成组出线，用户在一组单选钮中 必须并且最多只能选择一项。如果要使几个单 选钮属于一个组，最好用框架控件，将这几个 单选钮放在一个框架控件中。 • 属性： • （ 1 ） Caption：单选钮或者复选框的文本注释 内容，即单选钮或者复选框边上的文本标题。 • （2）Alignment：设置标题和按钮的左右位置。 0：按钮左标题右，1：按钮右标题左
vb第16单选按钮、复选框控件
标准控件二 21、掌握单选按钮控件的设置与使用2、掌握复选框控件的设置与使用单选按钮控件的设置与使用、复选框控件的设置与使用单选按钮控件、复选框控件的属性设置与代码编写10 10 18复习评讲作业。
新课标准控件二一、选择控件—单选按钮复选框和单选按钮的属性和事件Value属性Alignment属性Style属性应用举例例：使用单选按钮使文本框中的字体改变大小。
Text1.FontSize = 14End SubPrivate Sub Option2_Click()Text1.FontSize = 18End Sub练习1：请用单选按钮使文本框中的字体改变颜色。
练习2：使用单选按钮控制窗口大小怎样编写代码。
想在窗体中加载图片怎样编写代码，想使图片随窗口大小变化怎么办(提示：可以使用图像框)。
Private Sub Option1_Click()Form1.WindowState = 0Form1.Top = 100Form1.Left = 100Form1.Height = 7000 '产生窗口的随机大小时用Rnd * 7000 Form1.Width = 10000Image1.Top = 0Image1.Left = 0Image1.Height = Form1.HeightImage1.Width = Form1.WidthImage1.Stretch = TrueImage1.Picture = LoadPicture("d:\hua.jpg")End SubPrivate Sub Option2_Click()Form1.WindowState = 2Image1.Top = 0Image1.Left = 0Image1.Height = Form1.HeightImage1.Width = Form1.WidthForm1.Picture =LoadPicture("d:\hua.jpg")End Sub二、选择控件—复选框例：使用复选框显示文本框中的字体分别为下划线、倾斜、粗体Private Sub Check1_Click()Text1.FontUnderline = TrueEnd SubPrivate Sub Check2_Click()Text1.FontItalic = TrueEnd SubPrivate Sub Check3_Click()Text1.FontBold = TrueEnd Sub该例在运行时复选框取消时有何表现？问：复选框取消时如何设置代码，使其没有下划线等效果？Private Sub Check1_Click()If Check1.Value = 1 ThenText1.FontUnderline = TrueElseText1.FontUnderline = FalseEnd IfEnd SubPrivate Sub Check2_Click()If Check2.Value = 1 ThenText1.FontItalic = TrueElseText1.FontItalic = FalseEnd IfEnd SubPrivate Sub Check3_Click()If Check3.Value = 1 ThenText1.FontBold = TrueElseText1.FontBold = FalseEnd If练习1：使用复选框列出休闲项目，运行时把选择的项目用msgbox 显示出来。
visual basic教案：12 使用单选按钮组.doc
课时教案课题 5.5.2 使用单选按钮组课时1授课时间教学目标让同学们掌握如何对单选按钮进行分组和分组后的代码的完成教学重点单选按钮的分组教学难点分组后的代码怎么写课型复习课教法讲授、课件演示教学过程学生活动一、回顾复习1、单选按钮2、单选按钮常用属性和事件二、新课5.5.2 使用单选按钮组相关知识：单选钮的特点是：当选定其中一个后，其余就自动关闭。
但当需要在同一窗体中建立几组相互独立的单选钮时，就需要用框架（Frame）将每一组单选钮框起来，这样在一个框架内的单选钮为一组，它们的操作不影响框外其他组的单选钮。
另外，对于其他类型的控件用框架框起来，可提供视觉上的区分和总体的激活或屏蔽特性。
回答老师提出的问题注意听讲，观看分组后的效果图及不同之处跟着老师写代码•Private Sub Command1_Click() •If Option1.Value Then•Text1.FontName = "宋体" •Else•Text1.FontName = "黑体"•End If•If Option3.Value Then•Text1.FontSize = 10•Else•Text1.FontSize = 14•End If•End Sub•Private Sub Command2_Click()•Unload Me•End Sub注：分组用什么？分组后各个按钮的设置相互有影响吗？有的话，没有的话？（讨论）同学们用自己的方法写出本题的代码课后作业作业：课时教案教学目标让同学们掌握和达到单选按钮分组教学重点单选按钮的分组教学难点代码的巩固课型复习课教法讲授、课件演示教学过程学生活动一、回顾复习1、单选按钮2、单选按钮常用属性和事件3、用谁来分组？二、新课上节课总结出什么了？（学生应从以下方面回答）分组的用途？怎么分组？分组后各个单选钮的属性？5.5.2 使用单选按钮组完成代码：Private sub command1_click()Text1.text=”我是”If thenText1.text=ElseText1.text=End ifIf thenText1.text= 回答老师提出的问题跟着老师写代码同学们用自己的方法写出本题的代码。
VB命令按钮、选择框、单选按钮和框架
[教案]（六）命令按钮、选择框、单选按钮和框架授课方式：讲授法授课学时：2学时教学目的：通过本次课的学习，学生应该掌握使用命令按钮、选择框、单选按钮和框架四种控件常用的各种属性、事件和方法，并且能够准确使用各种控件设计各种用户界面，并能编写出响应事件的代码。
教学重点和难点：1．命令按钮的属性和事件；2．选择框和单选按钮的属性和事件。
教学过程：命令按钮、选择框、单选按钮和框架一、命令按钮(CommandButton)1．了解命令按钮在VB中的用途。
2．掌握命令按钮的以下3个主要属性（1）Caption（2）Style（3）Picture3．事件介绍命令按钮最常用的事件——Click事件的应用情况。
二、选择框(CheckBox)1．用途介绍选择框在VB中的用途。
2．主要属性掌握选择框的以下4个属性：（1）Caption（2）Alignment（3）Value（4）Style3．事件介绍选择框最常用的事件——Click事件的具体应用情况。
三、单选按钮（OptionButton）1．用途介绍单选按钮在VB中的用途。
2．主要属性掌握单选按钮的以下5个属性：（1）Caption（2）Alignment（3）Value（4）Style（5）Enabled3．选项分组掌握如何个单选按钮进行分组，以及那些对象可以作为分组的容器。
四、框架(Frame)1．用途介绍框架在VB中的主要用途就是用于分组。
2．主要属性掌握框架的以下3个属性：（1）Caption（2）Enabled（3）Visible学生作业：上机实验四：1．命令按钮、选择框和单选钮2．单选钮和框架[讲稿]（六）命令按钮、选择框、单选按钮和框架一、命令按钮（CommandButton）1、主要属性（1）Caption：如果某个字母前加入“＆”，则程序运行时标题中的该字母带有下划线，即作为快捷键，用Alt+快捷键（2）Style：在VB5.0 以后的版本中，命令按钮上不仅可显示文字，还可设置显示图形。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
可视化程序设计VB 课程教案课题单选按钮与框架授课人
课程类型一体化范围及性质
班级课时 1
上课时间上课地点
教学目标知识与技能：
1、掌握单选按钮的功能和使用方法；
2、了解复选按钮的功能；
3、知道框架的作用。
过程与方法：讲授、练习
情感态度价值观：刻苦耐劳、积极认真。
重点界面设计、单选按钮和框架的常用属性、事件和方法的使用。
难点对象属性与框架分组的操作，程序代码的理解与运用。
学情分析有一定程序设计基础，对命令按钮和标签有认识，能使用相关属性，但自学能力差。
教学方法讲练结合
教学准备
教学过程与内容设计意图
教学方法
时间
（分钟）
一、引入
运行一个“按钮对比”的程序，吸入学生注意力，激发学生学习的热情。
（让学生找出与以往程序相同功能的不同点）
二、新课
1、单选按钮
1）属性
（1）Value属性：用来表示单选按钮的状态，其值可以设置为True或False。
（2）Alignment属性：用来设置单选按钮控件标题的位置。
（3）Style属性：用来设置单选按钮的显示方式，只能在设计时使用。
2）事件
单选按钮接收Click事件，但一般不需要编写Click事件过程。
3）实例1（改变文字的颜色）
（1）界面与属性设置：（1个文本框，3个单选按钮）讲练结合
观察分析
讲授、演示
启发引导
讲练结合
观察分析
自主探究
讨论合作
交流总结
5
5
12
主要属性设置：1、文本框：
字体大小：20 2、单选按钮：
字体大小：四号
(2)代码：（绿色与蓝色的代码自己完善，绿色：vbgreen; 蓝色：vbBlue ）
略......
(3)思考题：
增加一个“黑色”单选按钮，并实现相应功能。
(黑色：vbblack) 2、框架
功能：使用框架是为了对控件进行分组，即把指定的控件放到框架中。
1）使用方法：
A 、可以先画框架，然后在框架内画出需要成为一组的控件。
B 、如果要用框架对已有控件分组，可先选定所有需要框起的控件，将它们剪切到剪贴板，然后选定框架并将剪贴板上的控件粘贴到框架上。
2）属性
框架的属性包括Enabled 、FontBold 、FontName 、FontUnderline 、Height 、Left 、Top 、Visible 、Width 。
3）事件
框架可以响应Click 和DblClick 事件。
但是，一般不需要。
4）实例2（多功能的字体设置）
单选按钮的特点是只能选一个，当需要在同一窗口中有多个选择时，就要借助框架来给它们分组。
1、界面与属性设置：（1个文本框，3个框架，10个单选按钮）
2、代码： 1）“字体颜色”的代码参考上一题。
2）“字体”的代码： ... 3）“文字大小”的代码： ...
（其余两个文字大小的代码，自己完善）
3、思考题：
1）如何改变字体（属性，如何赋值）？增加一个“楷体”选项 2）单选按钮的图形方式与命令按钮有什么区别？ 三、小结
1、单选按钮与框架的作用与使用方式。
2、代码的理解与综合运用。
四、作业
完成各题目后的拓展与思考（用文字描述）
分享演示 教师评价
讲授、演示 讲练结合 观察分析 自主探究 讨论合作 交流总结 分享演示 教师评价 归纳总结
3 3 12 5
教学反思
1、这4个单选按钮的Style 属性设置为：1 （图形方式）
2、根据样式设置底色与文字。