Access VBA教程:ItemData属性

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

expression.ItemData(Index)

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

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

说明

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

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

提示   使用Column属性可以从指定的行和列返回数据,即便指定的列不是绑定列。

VBA示例

下面的示例打印“雇员”窗体中“雇员列表”列表框中每个选定行的绑定列值。此时,列表框的 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

上页:Access VBA教程:Item属性 下页:Access VBA教程:ItemLayout属性

Access VBA教程:ItemData属性

Access VBA教程:ItemLayout属性 Access VBA教程:ItemsAcross属性
Access VBA教程:ItemSizeHeight属性 Access VBA教程:ItemSizeWidth属性
Access VBA教程:ItemsSelected属性 Access VBA教程:KeepTogether属性
Access VBA教程:KeepTogether属性 - 组 Access VBA教程:KeepTogether属性 - 节
Access VBA教程:KeyboardLanguage属性 Access VBA教程:KeyPreview属性
Access VBA教程:Kind属性 Access VBA教程:LabelAlign属性
Access VBA教程:LabelX属性 Access VBA教程:LabelY属性
Access VBA教程:LanguageSettings属性 Access VBA教程:LayoutForPrint属性
Access VBA教程:Left属性 Access VBA教程:LeftMargin属性
Access VBA教程:LimitToList属性 Access VBA教程:Lines属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号