Control.Selected-Eigenschaft (Access)

Verwenden Sie die Selected-Eigenschaft in Visual Basic, um zu bestimmen, ob ein Element ausgewählt ist. Long mit Lese-/Schreibzugriff.

Syntax

Ausdruck verwendet werden. Selected (lRow)

Ausdruck Eine Variable, die ein Control-Objekt darstellt.

Parameter

Name Erforderlich/Optional Datentyp Beschreibung
Zeile Erforderlich Long Das Element befindet sich im Listenfeld. Das erste Element wird durch eine Null (0) dargestellt, das zweite durch eine Eins (1) usw.

Hinweise

Die Eigenschaft Selected ist ein nullbasiertes Array, das den ausgewählten Status jedes Elements in einem Listenfeld enthält.

Einstellung Beschreibung
True Das Listenfeldelement ist ausgewählt.
False Das Listenfeldelement ist nicht ausgewählt.

Diese Eigenschaft ist nur zur Laufzeit verfügbar.

Wenn die MultiSelect-Eigenschaft eines Listenfeld-Steuerelements auf "None" festgelegt ist, kann nur für ein Element die Selected-Eigenschaft auf "True" festgelegt sein. Wenn die Eigenschaft MultiSelect eines Listenfeldsteuerelements auf „Simple“ oder „Extended“ festgelegt ist, kann die Eigenschaft Selected eines beliebigen oder sämtlicher Elemente auf True festgelegt werden. Ein an ein Feld gebundenes Listenfeld für Mehrfachauswahl hat immer die Eigenschaft "Value " gleich Null. Sie verwenden die Selected-Eigenschaft oder die ItemsSelected-Auflistung , um Informationen darüber abzurufen, welche Elemente ausgewählt sind.

Verwenden Sie die Selected-Eigenschaft, um Elemente in einem Listenfeld mithilfe von Visual Basic auszuwählen. Beispielsweise wählt der folgende Ausdruck das fünfte Element in der Liste aus:

Me!Listbox.Selected(4) = True

Beispiel

Im folgenden Beispiel wird die Selected-Eigenschaft verwendet, um ausgewählte Elemente im Listenfeld lstSource in das Listenfeld lstDestination zu verschieben. Die RowSourceType-Eigenschaft des Listenfelds lstDestination wird auf Value List festgelegt, und die RowSource-Eigenschaft des Steuerelements wird aus allen ausgewählten Elementen im lstSource-Steuerelement erstellt. Die MultiSelect-Eigenschaft des Listenfelds lstSource ist auf Erweitert festgelegt. Die Prozedur CopySelected( ) wird von der Befehlsschaltfläche cmdCopyItem aufgerufen.

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

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.