全部显示

ItemData 属性

       

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

expression.ItemData(Index)

expression   必需。返回“Applies To”列表中的一个对象的表达式。

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