Propiedad Control.Selected (Access)

Use la propiedad Seleccionado en Visual Basic para determinar si un elemento está seleccionado. Long de lectura y escritura.

Sintaxis

más sencilla.Seleccionado (lFila)

expresión Variable que representa un objeto Control .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
fila	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 Seleccionado para seleccionar elementos en 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 utiliza 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 está establecida 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 Multiselección 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.