全部显示

ItemData 属性返回组合框或列表框中指定行的绑定列中的数据。Variant 型，只读。

expression.ItemData(Index)

expression     必需。返回“应用于”列表中的一个对象的表达式。

Index     必需 Long 型。组合框或列表框中包含要返回的数据的行。组合框和列表框中的行从零开始编号。例如，要返回组合框中的第六行，必须在 rowindex   参数中指定 5。

说明

使用 ItemData 属性可以在组合框或列表框中的项目列表中全面查找。例如，假设要从列表框中的所有项目中查找特定的项。那么，可以先使用 ListCount 属性来确定列表框中的行数；然后再使用 ItemData 属性返回每行中绑定列的数据。

还可以使用 ItemData 属性只返回列表框中选定行的数据。可以反复查找 ItemsSelected 集合以确定列表框中选定了哪些行，然后使用 ItemData 属性返回这些行中的数据。必须将列表框的 MultiSelect 属性设为“简单”或“展开的”，这样才能一次选择多行。

提示

Column

示例

下面的示例打印“雇员”窗体中“雇员列表”列表框中每个选定行的绑定列值。此时，列表框的 MultiSelect 属性必须设为“简单”或“展开的”。

Sub RowsSelected()

    Dim ctlList As Control, varItem As Variant

    ' Return Control object variable pointing to list box.

    Set ctlList = Forms!Employees!EmployeeList

    ' Enumerate through selected items.

    For Each varItem in ctlList.ItemsSelected

        ' Print value of bound column.

        Debug.Print ctlList.ItemData(varItem)

    Next varItem

End Sub