Control.Selected-Eigenschaft (Access)

Artikel
04/07/2023

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

Syntax

Ausdruck. Ausgewählt (lRow)

Ausdruck Eine Variable, die ein Control-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
lRow	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 Keine festgelegt ist, kann die Selected-Eigenschaft nur für ein Element auf True festgelegt werden. 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 Listenfeld mit Mehrfachauswahl, das an ein Feld gebunden ist, weist immer eine Value-Eigenschaft gleich Null auf. 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 ist 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 CopySelected( ) -Prozedur wird über die 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.

Freigeben über