Access-97-Datenbank mit Demo-Datenbank
Ein Listenfeld hat für jeden Listeneintrag eine Eigenschaft namens Selected, die man lesen bzw. setzen kann. Wenn Sie die Mehrfachauswahl des Listenfeldes auf Einfach gesetzt haben, kann immer nur eine Selected-Eigenschaft den Wert True haben. Alle anderen Selected-Eigenschaften bleiben False.
Bei einem Listenfeld mit Mehrfach- bzw. Einzelauswahl können Sie mit einer For-Schleife alle Listeneinträge durchlaufen und die Selected-Eigenschaft auf True setzen:
Dim i As Integer
For i = 0 To Me!lstAuswahl.ListCount - 1
Me!lstAuswahl.Selected(i) = True
Next i
Die ListCount-Eigenschaft ergibt die Anzahl der Einträge im Listenfeld.