Propiedad ListBox.ItemData (Access)

La propiedad ItemData devuelve los datos de la columna enlazada de la fila especificada en un cuadro de lista. Variant de solo lectura.

Sintaxis

expresión. ItemData (Index)

Expresión Variable que representa un objeto ListBox .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Index	Obligatorio	Long	Fila del cuadro combinado o cuadro de lista que contiene los datos que desea devolver. Las filas de cuadros combinados y cuadros de lista se indizan a partir de cero. Por ejemplo, para devolver el elemento de la sexta fila de un cuadro combinado, debe especificar 5 para el argumento rowindex.

Comentarios

La propiedad ItemData le permite realizar una iteración con la lista de entradas de un cuadro combinado o cuadro de lista. Por ejemplo, suponga que quiere realizar una iteración con todos los elementos de un cuadro de lista para buscar una entrada particular. Utilice la propiedad ListCount para determinar el número de filas del cuadro de lista y, a continuación, use la propiedad ItemData para devolver los datos de la columna enlazada en cada fila.

También puede usar la propiedad ItemData para obtener solo los datos de las filas seleccionadas en un cuadro de lista. Puede recorrer en iteración la colección ItemsSelected para determinar qué fila o filas del cuadro de lista se han seleccionado y, a continuación, usar la propiedad ItemData para devolver los datos de esas filas. Debe establecer el valor de la propiedad MultiSelect del cuadro de lista en Simple o Extendida para permitir al usuario seleccionar más de una fila al mismo tiempo.

Utilice la propiedad Column para devolver datos de una fila y columna especificadas, incluso si la columna especificada no es la columna enlazada.

Ejemplo:

En el ejemplo siguiente se imprime el valor de la columna enlazada para cada fila seleccionada en el cuadro de lista EmployeeList en un formulario Employees . La propiedad MultiSelect del cuadro de lista debe establecerse en Simple o Extendida.

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

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.