Propiedad Control.Selected (Access)
Use la propiedad Selected de Visual Basic para determinar si está seleccionado un elemento. Long de lectura y escritura.
Sintaxis
expresión. Seleccionado (lRow)
Expresión Variable que representa un objeto Control .
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.