vb中ListIndex属性如何利用

发布网友发布时间：2022-04-23 10:42

共1个回答

热心网友时间：2022-04-23 12:11

返回或设置控件中当前选择项目的索引号，如：

List1.ListIndex=5 '设置要选择List1控件的第5条记录
v=List1.ListIndex '返回当前选择List1的第几条记录

ListIndex 属性示例(MSDN)：

这个例子在 ListBox 控件中显示三个演员的名字，在 Label 控件中显示被选中的演员所对应的薪金。要尝试这个例子，请将代码粘贴到包含一个 ComboBox 控件和一个 Label 控件的窗体的声明部分，然后按 F5 键并在 ComboBox 中选择一个名字。

Dim Player(0 To 2) ' 说明两个数组的大小。
Dim Salary(0 To 2)
Private Sub Form_Load ()
Dim I ' 声明变量。
AutoSize = True
Player(0) = "Miggey McMoo" ' 在数组中输入数据。
Player(1) = "Alf Hinshaw"
Player(2) = "Woofer Dean"
Salary(0) = "$234,500"
Salary(1) = "$158,900"
Salary(2) = "$1,030,500"
For I = 0 To 2 ' 在列表中添加名字。
Combo1.AddItem Player(I)
Next I
Combo1.ListIndex = 0 ' 显示列表中的第一项。
End Sub

Private Sub Combo1_Click ()
' 显示名字所对应的薪金。
Label1.Caption = Salary(Combo1.ListIndex)
End Sub

以下的控件都包含ListIndex 属性：

ComboBox
DirListBox
DriveListBox
FileListBox
ListBox