VB中ListBox的应用

入门——ListBox控件的使用

【字体大小：小中大】2008-02-18 19:56 来源：作者：

ListBox(列表框)控件可以显示一组项目的列表，用户可以根据需要从中选择一个或多个选项。列表框可以为用户提供所有选项的列表。虽然也可设置列表框为多列列表的形式，但在缺省时列表框单列垂直显示所有的选项，如果项目数目超过了列表框可显示的数目，控件上将自动出现滚动条。这时用户可在列表中上、下、左、右滚动。ListBox控件在工具箱中的图标如图所示：

一、ListBox常用属性

1、BackColor 属性：用于显示ListBox控件中的文本和图形的背景颜色，默认为白色(Window)

2、BorderStyle 属性：控制在列表框ListBox周围绘制的边框的类型，其枚举值为下面三个：

BorderStyle.None——无边框

BorderStyle.FixedSingle——单行边框

BorderStyle.Fixed3D——三维边框

默认值为BorderStyle.Fixed3D。

3、Font、ForeColor 属性：前者用于调整列表框中文本的字体，后者用于调整文本框中文本或者图形的前景色。

4、MultiColumn 属性：指示列表框中的项是否以水平的方式在列表框中显示，默认为False，此时所有的项都只显示为一列，当列表框无法显示全部的项的时候，将会出现一个垂直的滚动条；如果MultiColumn属性为True，则列表框以多列的形式来显示所有的项，如果一列无法全部显示完，则在水平位置重新显示一列，直到显示完毕为止，此时将会出现一个水平滚动条，如下图一所示：

5、ColumnWidth 属性：指示“多列列表框”中各列的宽度。当MultiColumn 属性为True时才起作用，其默认值为0，即将默认宽度分配给每列。可以使用此属性确保多列 ListBox 中的每列都可正确显示其项，我们可以通过如下代码来自己设置列表框ColumnWidth 属性的值，以确保能以最优的宽度来显示列表：

Private Sub SetupMyMultiColumn()

Dim x As Integer

Dim width As Integer =

CInt(ListBox1.CreateGraphics().MeasureString(ListBox1.Items(ListBox1. Items.Count - 1).ToString(), ListBox1.Font).Width)

ListBox1.ColumnWidth = width

End Sub

6、ScrollAlwaysVisible 属性：指示无论列表框中有多少个项，都始终显示滚动条。默认为False

7、HorizontalScrollbar 属性：指示是否为超过列表框右边缘的项目显示滚动条，默认为False。该属性在列表框以单列显示列表的时候比较有用，与之配合使用的还有HorizontalExtent 属性。

8、SelectionMode 属性：指示列表框式单项选择、多项选择还是不可选择，其枚举值有下面四个：

MultiExtended——可以选择多项，并且用户可使用 SHIFT 键、CTRL 键和箭头键来进行选择。

MultiSimple——可以选择多项。

None——无法选择项。

One——只能选择一项。

默认是One

9、SelectedItems、SelectedItem、SelectedIndex 属性：这三个属性都与选择列表框中的项有关。SelectedItems 属性返回的是ListBox当前选定的项的集合；SelectedItem属性返回的是ListBox中选定的第一项，也是SelectedItems 集合中的第一项；SelectedIndex 属性返回的是SelectedItem在列表框中的索引，其值是一个整数，如果列表框未选定任何项，则它的值为-1，我们还可以通过改变它的值来更改选定项。

10、Items 属性：返回的是列表框的所有项的集合。

后面的9、10属性属于比较常用的，更详细的使用我们将在下面通过实例来掌握它们

二、向列表框中添加项目

1、设计时添加项目：

我们可以在设计的时候为ListBox控件添加列表项目。选择ListBox控件，在它的属性窗口中找到Items属性，单击后面的省略号，进入“字符串集合编辑器”中，按要求和需要输入即可，然后单击“确认”。如下图二所示：

图二：编辑列表框的列表项目

2、在编程时添加项目：

编程时添加列表项目灵活多变，将会是我们以后使用列表框的主要手段，所以我们一定要学会怎么在编程时添加项目。

对于这个，我们主要是使用ListBox1.Items.Add(item)方法来实现。如下代码所示：

Sub AddItem()

ListBox1.Items.Add("aaaaaa")

ListBox1.Items.Add("bbbbbb")

ListBox1.Items.Add("cccccc")

ListBox1.Items.Add("dddddd")

ListBox1.Items.Add("eeeeee")

ListBox1.Items.Add("ffffff")

ListBox1.Items.Add("gggggg")

ListBox1.Items.Add("kkkkkk")

ListBox1.Items.Add("llllll")

End Sub

上面代码是一个添加列表项的过程，我们可以把它放在任何可以初始化控件的位置，例如我们放在一个按钮的Click事件中，执行之后，就会在列表框中显示出上面添加的各项了

三、ListBox的Item的其它方法

1、插入项目：

此外还可以通过ListBox1.Items.Insert()方法来在已经存在的列表中插入一个项目，例如如下代码：

ListBox1.Items.Insert(1, "插入的项目")

效果如下图三所示：

三、ListBox的Item的其它方法

1、插入项目：

此外还可以通过ListBox1.Items.Insert()方法来在已经存在的列表中插入一个项目，例如如下代码：

ListBox1.Items.Insert(1, "插入的项目")

效果如下图三所示：