Propiedad ListBox.Selected (Access)

Use la propiedad Selected de Visual Basic para determinar si está seleccionado un elemento de un cuadro de lista. Long de lectura y escritura.

Sintaxis

expresión. Seleccionado (lRow)

Expresión Variable que representa un objeto ListBox .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
lRow	Obligatorio	Long	Elemento del cuadro de lista. El primer elemento se representa con un cero (0), el segundo con un uno (1), etc.

Comentarios

La propiedad Selected es una matriz basada en ceros que contiene el estado seleccionado de cada elemento de un cuadro de lista.

Configuración	Descripción
True	El elemento del cuadro de lista está seleccionado.
False	El elemento del cuadro de lista no está seleccionado.

Esta propiedad sólo está disponible en tiempo de ejecución.

Cuando la propiedad MultiSelect del control de un cuadro de lista se establece en None, solo el elemento puede tener su propiedad Selected establecida en True. Cuando la propiedad MultiSelect del control de un cuadro de lista se establece en Simple o Extended, cualquiera o todos los elementos pueden tener su propiedad Selected establecida en True. Un cuadro de lista de selección múltiple enlazado a un campo siempre tendrá una propiedad Value igual a Null. La propiedad Selected o la recopilación ItemsSelected se usa para recupera información sobre los elementos que están seleccionados.

Use la propiedad Selected para seleccionar elementos de un cuadro de lista mediante Visual Basic. Por ejemplo, la siguiente expresión selecciona el quinto elemento de la lista:

Me!Listbox.Selected(4) = True

Ejemplo:

En el ejemplo siguiente se usa la propiedad Selected para mover los elementos seleccionados del cuadro de lista lstSource al cuadro de lista lstDestination . La propiedad RowSourceType del cuadro de lista lstDestination se establece en Lista de valores y la propiedad RowSource del control se construye a partir de todos los elementos seleccionados en el control lstSource. La propiedad MultiSelect del cuadro de lista lstSource está establecida en Extendida. Se llama al procedimiento CopySelected( ) desde el botón de comando cmdCopyItem .

Private Sub cmdCopyItem_Click() 
 CopySelected Me 
End Sub 
 
Public Sub CopySelected(ByRef frm As Form) 
 
 Dim ctlSource As Control 
 Dim ctlDest As Control 
 Dim strItems As String 
 Dim intCurrentRow As Integer 
 
 Set ctlSource = frm!lstSource 
 Set ctlDest = frm!lstDestination 
 
 For intCurrentRow = 0 To ctlSource.ListCount - 1 
 If ctlSource.Selected(intCurrentRow) Then 
 strItems = strItems & ctlSource.Column(0, _ 
 intCurrentRow) & ";" 
 End If 
 Next intCurrentRow 
 
 ' Reset destination control's RowSource property. 
 ctlDest.RowSource = "" 
 ctlDest.RowSource = strItems 
 
 Set ctlSource = Nothing 
 Set ctlDest = Nothing 
 
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.