灯火互联
管理员
管理员
  • 注册日期2011-07-27
  • 发帖数41778
  • QQ
  • 火币41290枚
  • 粉丝1086
  • 关注100
  • 终身成就奖
  • 最爱沙发
  • 忠实会员
  • 灌水天才奖
  • 贴图大师奖
  • 原创先锋奖
  • 特殊贡献奖
  • 宣传大使奖
  • 优秀斑竹奖
  • 社区明星
阅读:4802回复:0

[系统教程]VB 神童教程第二章第八节——组合框控件

楼主#
更多 发布于:2011-10-17 15:25

组合框控件(ComboBox)将文本框控件(TextBox)与列表框控件(ListBox)的特性结合为一体,兼具文本框控件与列表框控件两者的特性。它可以如同列表框一样,让用户选择所需项目;又可以如文本框一样通过输入文本来选择表项。
组合框默认的名称是 ComboX(X为阿拉伯数字 1、2、3 ,等等),规则的命名方式为:CboX(X为用户自定义的名字,如 CboName、CboColor ,等等)。组合框在 VB 工具箱面板中的图标如图一:

图一
一、组合框控件的主要属性:
列表框控件的大部分属性同样适合于组合框,此外,组合框还有一些自己的一些属性:
1、Style(类型)属性
组合框共有三种 Style :
当值为 0 ,组合框是“下拉式组合框”(DropDown Combo),与下拉式列表框相似,但不同的是,下拉式组合框可以通过输入文本的方法在表项中进行选择,可识别 Dropdown 、Click、Change 事件,如图二:

图二
当值为 1 ,组合框称为“简单组合框”(Simple Combo),由可以输入文本的编辑区与一个标准列表框组成,可识别 Change 、DblClick 事件,如图三:

图三
当值为 2 ,组合框称为“下拉式列表框”(Dropdown ListBox),它的右边有个箭头,可供“拉下”或“收起”操作。它不能识别 DblClick 及 Change 事件,但可识别 Dropdown 、Click 事件,如图四:

图四
综上所述,如果你想让用户能够输入项目,则应将组合框设置成 0 或 1 ,如果只想让用户对已有项目进行选择,则应将组合框设置成 2 。
2、Text(文本)属性:
本属性值返回用户选择的文本或直接在编辑区域输入的文本,可以在界面设置时直接输入,如图五:

图五
但要显示多个选项,不能简单地用 Text 属性指定,因为后一选项会覆盖前面的选项,这时,常常要用到窗体的载入事件。(Form_Load)
Form_Load 的意思是,在打开窗口的同时,将指定的内容载入。详细情况见后面的窗体篇。
二、组合框的事件:
根据组合框的类型,它们所响应的事件是不同的。
例如,当组合框的 Style 属性为 1 时,能接收 DblClick 事件,而其他两种组合框能够接收 Click 与 Dropdown 事件;当 Style 属性为 0 或 1 时,文本框可以接收 Change 事件。
三、组合框的方法:
跟列表框一样,组合框也适用 AddItem 、Clear 、RemoveItem 方法。
四、组合框举例:
有如图六这样一个应用程序:

图六
在名为 CboChoose 的下拉组合框中任意选择一种机型,自动会在名为 LblShow 的标签上显示出来。
程序代码如下:
窗体:
Private Sub Form_Load()
 CboChoose.AddItem "IBM"
 CboChoose.AddItem "AST"
 CboChoose.AddItem "Compaq"
 CboChoose.AddItem "联想"
 CboChoose.AddItem "长城"
 CboChoose.AddItem "东海"
End Sub
下拉式组合框的 Click 事件:
Private Sub CboChoose_Click()
 LblShow.Caption = "你的机型是:" ; CboChoose.Text
End Sub


喜欢0 评分0
游客

返回顶部