计算机vb二级第7章常用控件.ppt

  1. 1、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
  2. 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  3. 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
7.1 图形控件 1 图形框与图像框 2 直线和形状 7.2 选择控件 1 复选框 2 单选按钮 3 框架 4 列表框 5 组合框 7.3 其它控件 1 滚动条 2 计时器 以下按控件的重要性依次介绍 7.1 图形控件 1 图形框与图像框 2 直线和形状 7.2 选择控件 1 复选框 2 单选按钮 3 框架 4 列表框 5 组合框 7.3 其它控件 1 滚动条 2 计时器 7.2.1 复选框(CheckBox) 7.2.1 复选框(CheckBox) 复选框属性图示 复选框的Click事件与value值的变化 复选框的Click事件与value值的变化 复选框举例 编写程序,程序界面如图,要求能够通过单击复选框可以设置文本框中的字形是否为粗体、斜体、下划线 复选框举例 编写程序,程序界面如图,要求能够通过单击复选框可以设置文本框中的字形是否为粗体、斜体、下划线 复选框举例 复选框举例 编写程序,程序界面如图,要求能够通过单击复选框可以设置文本框中的字形是否为粗体、斜体、下划线 复选框举例 编写程序,程序界面如图,要求能够通过单击复选框可以设置文本框中的字形是否为粗体、斜体、下划线 7.2.2 单选按钮OptionButton 7.2.2 单选按钮OptionButton 单选按钮的Click事件与value值的变化 单选按钮举例 在前述例题中增加2个单选按钮,分别用于文本框中字体为黑体或楷体的设置。 (通过单击单选按钮可以设置文本框中文字的字体为黑体或楷体) 代码: 例:前例扩充功能; 增加允许设置复选框,其功能为: (1)要求在程序刚一运行时其它所有的复选框、单选按钮都处于不可用状态; (2)只有当单击选中允许设置复选框时,其它的各个复选框、单选按钮才变为可用状态,可以进行前述设置,如果再单击允许设置复选框使处于没有选中状态时,则其它的各个复选框、单选按钮又变为不可用状态: 复习:设置对象是否可用属性:Enabled 例:前例扩充功能; 增加允许设置复选框,其功能为: (1)要求在程序刚一运行时其它所有的复选框、单选按钮都处于不可用状态; (2)只有当单击选中允许设置复选框时,其它的各个复选框、单选按钮才变为可用状态,可以进行前述设置,如果再单击允许设置复选框使处于没有选中状态时,则其它的各个复选框、单选按钮又变为不可用状态: 课堂练习 立即练习此例题,体验复选框和单选按钮的属性和事件及使用方法。并作为作业提交。 小结:复选框与单选按钮的使用 复选框(CheckBox) Caption:复选框的标题 Value:复选框的状态 0——未被选中 1——被选中 编程时通常采用双分支结构对每一个复选框的状态进行判断 If Check1.Value=1 then …… Else …… End If 单选按钮(OptionButton) Caption:单选按钮的标题 Value:表示单选按钮的状态,当单击时就是选中 True ——被选中 False——未被选中 7.2.3 框架 (Frame) 控件 框架控件例:思考(作为实验作业) 7.2.4 列表框(ListBox)控件(有点难!) 一、列表框控件的重要属性 一、列表框控件的重要属性 常用方法1:在窗体的load事件中加载 Private Sub Form_Load() List1.AddItem 信电学院 List1.AddItem 统计学院 List1.AddItem 会计学院 List1.AddItem 外语学院 List1.AddItem 经济学院 End Sub 常用方法2:在其它对象的事件中加载 Private Sub Command1_Click() List1.AddItem 信电学院 List1.AddItem 统计学院 List1.AddItem 会计学院 List1.AddItem 外语学院 List1.AddItem 经济学院 End Sub 常用方法3:在其它对象的事件中加载 Private Sub Command1_Click() List2.AddItem List1.Text End Sub 列表框控件使用举例1 “确定” 按钮的单击事件 Private Sub Command1_Click() If Option1.Value = True Then List1.AddItem 联想 ElseIf Option2.Value = True Then Li

文档评论(0)

天马行空 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档