您的位置：　首页 > 技术文章 > Access数据库-模块/函数/VBA

Access (的 ListBox.ItemData)

来源:www.accessoft.com 点击数:3138 　 | 收藏 | 复制

时　间:2022-08-20 08:39:10
作　者:杨雪 ID：42182 城市：南京
摘　要:ItemData属性返回在列表框中指定行的绑定列中的数据，只读变量。
正　文:

语法:

表达式。ItemData (Index)

表达式一个代表 ListBox 对象的变量。

参数:

名称必需/可选数据类型说明

Index 必需 Long 组合框或列表框中包含要返回的数据的行。组合框和列表框中的行从零开始编制索引。例如，要返回组合框第六行中的项，应为 rowindex 参数指定 5。

备注:

ItemData 属性使您能够循环访问组合框或列表框中的项的列表。例如，假设您想要在循环中的所有项列表框来查找特定的项。使用 ListCount 属性可确定列表框中的行数，然后使用 ItemData 属性返回每行中绑定列的数据。

您可以使用 ItemData 属性返回数据只能从列表框中选定的行。您可以重复访问 ItemsSelected 集合以确定列表框中选择了哪一行或多行，然后使用 ItemData 属性返回这些行的数据。您必须设置为简单列表框的多重选择属性或扩展，以使用户可以一次选择多个行。

使用 Column 属性可返回指定行和列的数据，即使指定的列不是绑定的列。

示例:

下面的示例打印 Employees 窗体上 EmployeeList 列表框中每个选定行的绑定列的值。列表框的多重选择属性必须设置为简单或扩展中。

Sub RowsSelected() 
 Dim ctlList As Control, varItem As Variant 
 
 ' 返回指向列表框的控件对象变量
 Set ctlList = Forms!Employees!EmployeeList 
 ' 枚举选定的项目 
 For Each varItem in ctlList.ItemsSelected 
 ' 打印绑定列的值 
 Debug.Print ctlList.ItemData(varItem) 
 Next varItem 
End Sub

Access软件网QQ交流群 (群号:54525238) 　　　　　　Access源码网店

【打印此文】【关闭窗口】