Steuern des Fokus, wenn der Benutzer steuerelemente in einem Frame- oder MultiPage-Steuerelement auf einem Formular durchläuft

Im folgenden Beispiel wird die Cycle-Eigenschaft für ein Frame - und zwei Page-Objekte in einem MultiPage-Objekt definiert.

To use this example, copy this sample code to the Script Editor of a form. To run the code you need to open the form so the Open event will activate. Make sure that the form contains:

• Ein Rahmen-Steuerelement ( Frame ) mit der Bezeichnung "Frame1".

• Ein Multiseiten-Steuerelement ( MultiPage ) mit der Bezeichnung "MultiPage1", das zwei Objekte mit der Bezeichnung "Page1" und "Page2" besitzt.

• Zwei Befehlsschaltflächen-Steuerelemente ( CommandButton ) mit der Bezeichnung "CommandButton1" und "CommandButton2".

Platzieren Sie im Formular, im Frame und auf jedem Page -Element des MultiPage -Elements einige Steuerelemente, damit Sie sehen, wie Cycle die Aktivierreihenfolge des Frame - und des MultiPage -Elements beeinflusst. Der Benutzer sollte durch die Steuerelemente navigieren, um zu sehen, wie Cycle die Aktivierreihenfolge beeinflusst. Durch Klicken auf CommandButton1 wird die Aktivierreihenfolge auf Steuerelemente in den Objekten Frame und Page erweitert. Pressing CommandButton2 restricts the tab order.

Dim Frame1 
Dim MultiPage1 
 
Sub Item_Open() 
 Set Frame1 = Item.GetInspector.ModifiedFormPages("P.2").Frame1 
 Set MultiPage1 = Item.GetInspector.ModifiedFormPages("P.2").MultiPage1 
 RestrictCycles 
End Sub 
 
Sub RestrictCycles() 
 'Limit tab order for the Frame and Page objects 
 Frame1.Cycle = 2 
 MultiPage1.Page1.Cycle = 2 
 MultiPage1.Page2.Cycle = 2 
End Sub 
Sub CommandButton1_Click() 
 'Extend tab order subforms (the Frame and Page objects) 
 Frame1.Cycle = 0 
 MultiPage1.Page1.Cycle = 0 
 MultiPage1.Page2.Cycle = 0 
End Sub 
 
Sub CommandButton2_Click() 
 RestrictCycles 
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.