Attachment.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 Attachment-Objekt darstellt.
HinwBemerkungeneise
Wenn ein Steuerelement ausgewählt ist, sind seine Ziehpunkte sichtbar, sodass der Benutzer die Größe des Steuerelements ändern kann. 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. Anschließend können Sie die folgende Zeile im Fenster Debuggen eingeben.
? 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.
Feedback
https://aka.ms/ContentUserFeedback.
Bald verfügbar: Im Laufe des Jahres 2024 werden wir GitHub-Issues stufenweise als Feedbackmechanismus für Inhalte abbauen und durch ein neues Feedbacksystem ersetzen. Weitere Informationen finden Sie unterFeedback senden und anzeigen für