目录

ListIndex 属性

优质
小牛编辑
125浏览
2023-12-01

全部显示

返回或设置在命令栏组合框控件的列表框中选定项的索引号。如果没有选中列表中的任何项,那么该属性的返回值为 0。Long 类型,可读写。

注意此属性只能用于列表框控件。

说明

设置ListIndex 属性,使指定控件选中给定的项,并在应用程序中执行与该选项对应的操作。

示例

本示例根据命令栏“My Custom Bar”组合框中的选项,用ListIndex 属性确定需运行的正确的子程序。因为本示例使用ListIndex 属性,所以组合框中的文本可为任意内容。

Sub processSelection()
Dim userChoice As Long
userChoice = CommandBars("My Custom Bar").Controls(1).ListIndex
 Select Case userChoice
 Case 1
 chartcourse
 Case 2
 displaygraph
 Case Else
 MsgBox ("Invalid choice. Please choose again.")
 End Select
End Sub