How to: Control the Focus When the User Cycles through Controls in a Frame or MultiPage Control on a Form

  • Article

The following example defines the Cycle property for a Frame and two Page objects in a MultiPage.

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:

  • A Frame named Frame1.

  • A MultiPage named MultiPage1 that contains two objects named Page1 and Page2.

  • Two CommandButton controls named CommandButton1 and CommandButton2.

In the form, the Frame, and each Page of the MultiPage, place a couple of controls, so you can see how Cycle affects the tab order of the Frame and MultiPage.

The user should tab through the controls to observe how Cycle affects the tab order. Pressing CommandButton1 extends the tab order to include controls in the Frame and Page objects. 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