Report. ActiveControl-Eigenschaft (Access)Report.ActiveControl property (Access)

Sie können die ActiveControl -Eigenschaft zusammen mit dem Screen -Objekt verwenden, um das Steuerelement zu identifizieren oder darauf zu verweisen, das über den Fokus verfügt.You can use the ActiveControl property together with the Screen object to identify or refer to the control that has the focus. Schreibgeschütztes Control-Objekt.Read-only Control object.

SyntaxSyntax

Ausdruck. ActiveControlexpression.ActiveControl

Ausdruck Eine Variable, die ein Report -Objekt darstellt.expression A variable that represents a Report object.

BemerkungenRemarks

Diese Eigenschaftseinstellung enthält einen Verweis auf das Control -Objekt, das zur Laufzeit den Fokus hat.This property setting contains a reference to the Control object that has the focus at run time.

Verwenden Sie die ActiveControl-Eigenschaft, um auf das Steuerelement zu verweisen, das zur Laufzeit den Fokus hat, und um eine der zugehörigen Eigenschaften oder Methoden anzugeben.You can use the ActiveControl property to refer to the control that has the focus at run time together with one of its properties or methods. Das folgende Beispiel weist den Namen des Steuerelements, das den Fokus besitzt, der Variablen strControlName zu.The following example assigns the name of the control with the focus to the strControlName variable.

Dim ctlCurrentControl As Control 
Dim strControlName As String 
Set ctlCurrentControl = Screen.ActiveControl 
strControlName = ctlCurrentControl.Name

Wenn Sie die ActiveControl-Eigenschaft verwenden, jedoch kein Steuerelement den Fokus hat, oder wenn alle Steuerelemente des aktiven Formulars ausgeblendet oder deaktiviert sind, tritt ein Fehler auf.If no control has the focus when you use the ActiveControl property, or if all of the active form's controls are hidden or disabled, an error occurs.

BeispielExample

Im folgenden Beispiel wird das aktive Steuerelement der ctlCurrentControl Variablen zugewiesen, und dann werden je nach Wert der Name -Eigenschaft des Steuerelements unterschiedliche Aktionen ausgeführt.The following example assigns the active control to the ctlCurrentControl variable, and then takes different actions depending on the value of the control's Name property.

Dim ctlCurrentControl As Control 
 
Set ctlCurrentControl = Screen.ActiveControl 
If ctlCurrentControl.Name = "txtCustomerID" Then 
 . 
 . ' Do something here. 
 . 
ElseIf ctlCurrentControl.Name = "btnCustomerDetails" Then 
 . 
 . ' Do something here. 
 . 
End If

Support und FeedbackSupport and feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation?Have questions or feedback about Office VBA or this documentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.