第12讲 VB课件new.pptVIP

选择性控件(2) 1、列表框 2、组合框 6.1 3．Clear方法 用于清除列表框中的所有项目。 语法格式： 对象名. Clear 例如，要删除列表框 List1 中的所有项目 List1. Clear 例 课堂练习 P129 例 6-6 P132 例 6-8 * 1、列表框 一、用途 列表框控件（ListBox）用于显示项目列表，用户可从中选择一个或多个项目。 列表框有两种风格：标准和复选列表框。通过它的Style属性来设置。如下图： 0－标准型，1－复选框型 数值型 Style 可以多选，后续的选择不影响前面的选择 1 列表框只能单选，不允许多选 0( 默认) 默认列表框只有一列 0(默认) True表示按字母数字升序排列，否则按实际先后排序 逻辑型数值 Sorted 返回当前被选中的项目内容，为默认属性 字符串数据 Text Selected(0),Selected(1).若为True，则对应的项目被选中，否则未被选中 逻辑型数组 Selected 扩展多选，可以选择一组连续的项目，也可以选择一组不连续的 2 MultiSelect 返回当前被选中的项目序号，即List数组下标，无项目被选中,属性值为－1 整型数据 ListIndex 返回列表框中的项目的数目 整型数据 ListCount 数组的每个元素存放一个项目的内容, List(0), List(1)… 字符串数组 List 多列显示 0 Column 说明 属性值 属性名 二、重要属性 注意： ① List属性用来设置列表框的内容；该属性是一个字符数组，数组大小由 “ListCount”属性决定，数组下标从 0 开始，运行时，引用列表框的第一项是“List(0)”，第二项是”list(1)”…依此类推。 ② List(List1.listIndex) 等于 Text， List1.List(List1.ListIndex)=List1.Text； 即：List1.text为列表框中选中的项目的内容； ③List数组和Selected数组在程序中使用时，通常应在数组元素前加上对象名List1。数组元素的完整表示为： List1.List(0),List1.List(1)… 和List1.Selected(0),List1.Selected(1)…等； ④ List1.ListIndex 为列表框中选中项目的位置； 三、事件 （1）Click事件 当单击列表某一项目时，或在程序中改变了项目的选择，将触发列表框的Click事件。 该事件发生时系统会自动改变列表框的ListIndex、Selected、Text等属性。 （2）DblClick事件 当双击列表某一项目时，将触发列表框的DblClick事件。 四、方法 1．AddItem方法 用于将项目添加到列表框控件。 〈对象名〉.AddItem item [, index] item: 要加入的项目内容。 Index: 新增项目的位置，缺省则添加在最后。 2．RemoveItem方法 用于从列表框控件中删除一项。 〈 对象名〉. RemoveItem index Index: 删除项目的位置。 例[6-3] 交换两个列表框中的项目，其中一个列表框的项目为“a，b，c”，按 字母数字升序排列，另一个列表框中的项目为”1、2、3“，按加入的先后顺序 排列，程序运行后，双击某一个列表框中的一个项目，该项目会移动到另一 个列表框，并从原列表框中删除。 解题思路：在窗体上创建两个列表框，其中一个Sorted属性值设为True，另一 个的Sorted属性值设为False，其他属性值均使用默认值，在各自的dblclick 事件中编写程序：首先将选定的项目增加到另一个列表框中，再从本列表框中 删除该项目。 Private Sub List1_DblClick() List2.AddItem List1.Text List1.RemoveItem List1.ListIndex End Sub Private