Label.InSelection-Eigenschaft (Access)
Verwenden Sie die InSelection-Eigenschaft , um zu bestimmen oder anzugeben, ob ein Steuerelement in einem Formular in der Entwurfsansicht ausgewählt ist. Boolescher Wert mit Lese-/Schreibzugriff.
Syntax
Ausdruck. InSelection
Ausdruck Eine Variable, die ein Label-Objekt darstellt.
HinwBemerkungeneise
Wenn ein Steuerelement ausgewählt ist, sind seine Ziehpunkte zur Größenanpassung sichtbar, und seine Größe kann vom Benutzer geändert werden. Es können auch gleichzeitig mehrere Steuerelemente ausgewählt sein.
Beispiel
In der folgenden Funktion wird mit der InSelection-Eigenschaft ermittelt, ob auf dem angegebenen Formular das Steuerelement strControlName ausgewählt ist.
Fügen Sie zum Testen dieses Codes den Funktionscode IsControlSelected in den Abschnitt Deklarationen eines Codemoduls in der Northwind-Beispieldatenbank ein, öffnen Sie das Formular Kunden in der Entwurfsansicht, und wählen Sie das Steuerelement CompanyName aus. Geben Sie im Fenster Debuggen die folgende Zeile ein.
? IsControlSelected (Forms!Customers, "CompanyName")
Function IsControlSelected(frm As Form, _
strControlName As String) As Boolean
Dim intI As Integer, ctl As Control
If frm.CurrentView <> 0 Then
' Form is not in Design view.
Exit Function
Else
For intI = 0 To frm.Count - 1
Set ctl = frm(intI)
If ctl.InSelection = True Then
' Is desired control selected?
If UCase(ctl.Name) = UCase(strControlName) Then
IsControlSelected = True
Exit Function
End If
Else
IsControlSelected = False
End If
Next intI
End If
End Function
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.