Excel VBA编程  列表框
列表框主要用来显示选项列表，从其中可以选择一项或多项，当选项总数超过可显示的项目数，则在列表框控件上将自动添加垂直方向的滚动条，通过移动滚动条可以使列表框中的内容作上下滚动，以便用户能够到所需内容。
1．列表框常用属性
列表框与文字框做主要的区别在于列表框能够显示多行文字，并且每行文字是一个可以独立处理的项，除了一些常见的如Font、Height和name属性外，还包括以下属性。
● List属性
List属性是用来访问列表的全部选项，它是以数组的方式存在的。在列表中，每一项都是List属性的一个元素。所以，通过List属性，可以实现对列表框中每一选项的单独操作。另外，List属性只能够在程序代码中调用和设置。
例如，在列表框控件中显示“语文”、“数学”和“英语”选项，如图13-2所示。
图13-2  列表框
    Dim s(2)
    s(0) = "语文"
vba listbox控件详解
    s(1) = "数学"
    s(2) = "英语"
    Me.ListBox1.List = s
● ListIndex属性
ListIndex属性的作用是设置或返回控件中当前选定选项的索引。对于列表框控件来说，List
Index属性可以与List属性结合起来使用，共同确定选定选项的文本。
● ListCount属性
ListCount属性返回列表框中选项的数目，ListCount属性和List属性、ListIndex一样，只能够在程序代码中调用或设置。
● MultiSelect属性
通过设置MultiSelect属性可以实现在列表中同时选择多个选项。MultiSelect的属性值有三种，如表13-4所示。
表13-4  MultiSelect属性值
常量
属性值
说明
fmMultiSelectSingle
0
缺省值，每次只能选择一个选项。
fmMultiSelectMulti
1
多项选择
fmMultiSelectExtended
2
扩展多项选择
其中，选择扩展多项选择时，同时强下shift键和方向键，可以选择相连的多个选项，也可以在按下shift键的同时单击选择需要的选项。或者按下CTRL键，用鼠标逐个选择需要的选项。
● Selected属性
它是与List属性中各元素相对应的，用来判断List中每个选项是否被选择。例如，在上例中如果“语文”选项被选择，则Selected的值为True，相反则为False。
● Locked属性
列表框控件中的选项是可以选择的，但可以通过Locked属性，将其变为只读属性，即把Locked属性设置为True即可。
2．列表框常用方法
由于列表框主要是用于罗列出可供选择的选项，所以其常用的方法主要是针对列表框中的选项。
● AddItem方法
列表框控件可以通过AddItem方法来添加新的选项。
格式：
ListName.AddItem Item[,index]
其中，ListName是列表框控件的名称。Item是添加到列表中的字符串表达式，(若Item是字符串，则需要引号将它括起来)。Index是指定在列表中插入新选项的位置，例如Index为0表示第一个位置，若省略Index，则将选项插入在末尾。
提  示
对列表框中选项的添加是比较灵活的，在程序运行的任何时候使用 AddItem方法动态地添加项目，通常在Form_Load事件过程中添加选项。
● RemoveItem方法
如果用户需要删除列表框中的选项，可以使用RemoveItem方法。
格式：
ListName. RemoveItem [,index]
其中，ListName和index参数与AddItem中的参数相同。

版权声明：本站内容均来自互联网，仅供演示用，请勿用于商业和其他非法用途。如果侵犯了您的权益请与我们联系QQ:729038198，我们将在24小时内删除。