第十一章列表框组合框和滚动条

ListCount：整型值
表示项目的数量，ListCount-1是最后一项的下标。
2．Style属性
该值用来指示控件的显示类型和行为。在运行时 是只读的。列表框控件或组合框控件的Style属性含义 是不同的。
3．MultiSelect属性
用于指示是否能够在列表框控件中进行复选以及如何进 行复选，在运行时是只读的。 注意，组合框控件无此属性。 MultiSelect 属性设置值及含义
设置 值 0 （缺省值）不允许复选
含 义
1
简单复选。鼠标单击或按下空格键在列表中选中或取消选中项。 箭头键移动焦点 扩展复选。按下 SHIFT 并单击鼠标将在以前选中项的基础上 扩展选择到当前选中项。按下 CTRL 并单击鼠标来在列表中选 中或取消选中项
2
4．Selected属性
该属性返回或设置列表框控件中的一个项目的选择状态。 该属性是一个逻辑类型的数组，数组元素个数与列表框中 的项目数相同，其下标的变化范围与List属性相同。 例如：List1.Selected（0）=True表示列表框List1的第一
用于清除列表框控件或组合框控件中的所有项目。 〈对象名〉. Clear 例如，要删除列表框（List1）中所有项目，可使用： List1. Clear
4、事件 （1）Click事件 当单击某一列表项目时，将触发列表框与组合框控件 的Click事件。该事件发生时系统会自动改变列表框与组合 框控件的ListIndex、Selected、Text等属性，无需另行编写 代码。 （2）DblClick事件 当双击某一列表项目时，将触发列表框与简单组合框 控件的DblClick事件。
语法格式：
〈对象名〉. RemoveItem index
对index参数的规定同AddItem方法。
例如，要删除列表框（List1）中所有选中的项目，可使用
下面的程序段：
i = 0 Do While i <= List1.ListCount - 1 If List1.Selected(i) = True Then List1.RemoveItem i else i = i + 1 End If Loop 思考：是否可以用For循环？ 3．Clear方法
列表框控件（ListBox）用于显示项目列表，用户可从中 选择一个或多个项目。如果项目总数超过了可显示的项目
数， VB会自动加上滚动条。
列表框有两种风格：标准和复选列表框。通过它的 Style属性来设置
组合框控件（ComboBox） 将文本框和列表框的功能结
合在一起，用户可以在列表中选择某项（只能选取一项）。 或在编辑区域中直接输入文本内容来选定项目。
（3）Change事件
当用户通过键盘输入改变下拉式组合框或简单组合框 控件的文本框部分的正文，或者通过代码改变了Text属性 的设置时，将触发其Change事件。
设计一个用于设置字体属性的程序，界面如图所示。
11-2 滚动条 (ScrollBar)
1. 用 途
滚动条控件（ScrollBar）分为水平滚动条 （HScrollbar）和垂直滚动条（VscrollBar）二种，通 常附在窗体上协助观察数据或确定位置，也可用作数 据输入工具，用来提供某一范围内的数值供用户选择。
3 方法
1．AddItem方法 用于将项目添加到列表框控件或组合框控件。 语法格式：
〈对象名〉.AddItem item [, index]
其中：item: 为字符串表达式，表示要加入的项目。
Index:决定新增项目的位置，缺省，则添加在最后。
2．RemoveItem方法 用于从列表框控件或组合框控件中删除一项。
组合框共三种风格：下拉式组合框、简单组合框和下拉式列 表框。
二、主要属性
1．List、ListCount和ListIndex属性 这3个属性只能在程序代码中设置： List： 字符型数组 存放列表框的项目数据，下标是从0开始的。 例如： List(0)表示第一项（Listindex=0)的内容 ListIndex： 整型值 选中的项目的序号， 没有项目选中时为-1。
第十一章
列表框、组合框和滚动条
本章内容及要求：
掌握常用控件ListBox和ComboBox控件的列表项目 的添加、删除、选择和使用ቤተ መጻሕፍቲ ባይዱ会HScrollBar和
VScrollBar控件。
本章重点：
常用控件列表框、组合框和滚动条的常用 属性、
重要事件和方法的使用；
本章难点：
常用系统对象的使用。
11.1 列表框和组合框控件
个项目被选中，此时ListIndex的值设置为0。Selected属性 在设计时是不可用的，即无法在属性窗口中设置属性值。
5．NewIndex属性 返回最近加入列表框控件或组合框控件的项目的索引。 如果在列表中已没有项目或删除了一个项目，该属性将返 回-1。
6．TopIndex属性 返回或设置一个值，该值指定哪个项被显示在列表框 控件或组合框控件顶部的位置。该属性取值范围从0到 ListCount-1，在设计时不可用。 7．Sorted属性 返回一个逻辑值，当Sorted属性为True时列表框控 件或组合框控件的项目自动按字母表顺序（升序）排序， 为False时项目按加入的先后顺序排列显示。该属性只能 在设计时设置，不能在程序代码中设置。 8．Text属性 对于下拉式组合框与简单组合框，Text属性返回编辑 区域中的文本。对于列表框控件或下拉列表框，Text属性 的返回值总与List（ListIndex）的值相同
3. 方法
4. 事件
（1）Change事件 滚动条的Change事件在移动滚动框或通过代码改变其 Value属性值时发生。单击滚动条两端的箭头或空白处将 引发Change事件。
（2）Scroll事件
当滚动框被重新定位，或按水平方向或垂直方向滚动 时，Scroll事件发生。拖动滑块时会触发Scroll事件 Scroll事件与Change事件的区别在于：当滚动条控件 滚动时Scroll事件一直发生，而Change事件只是在滚动结
2. 属性
(1) Value 滑块所处位置所代表的值。 (2) Max：最大值 -32,768~32,767 (3) Min：最小值 -32,768~32,767 (4) SmallChange 最小变动值， 单击箭头时移动的增量值。 (5) LargeChange 最大变动值，单击空白处时移 动的增量值。
束之后才发生一次。
滚动条示例。设计一个用于设置字体颜色的程序.