Поделиться через

Управление фокусом при циклике пользователя через элементы управления в кадре или элементе управления MultiPage на форме

  • Статья

В следующем примере определяется свойство Cycle для объекта Frame и двух объектов Page в MultiPage.

Чтобы использовать этот пример, скопируйте пример кода в редактор скриптов формы. Чтобы запустить код, необходимо открыть форму, чтобы активировать событие Open . Убедитесь, что эта форма содержит:

  • Frame с именем Frame1.

  • Объект типа MultiPage с именем MultiPage1, содержащий два объекта с именами Page1 и Page2.

  • Два элемента управления CommandButton с именами CommandButton1 и CommandButton2.

В форме, Frame, и в каждом объекте Page объекта MultiPage поместите пару элементов управления, чтобы можно было видеть, как свойство Cycle влияет на порядок обхода объектов Frame и MultiPage при нажатии клавиши табуляции. Пользователь должен обойти объекты, нажимая клавишу табуляции, чтобы увидеть, как свойство Cycle влияет на порядок обхода. Нажатие кнопки CommandButton1 расширяет обход, включая в него элементы управления в объектах Frame и Page. Нажатие кнопки CommandButton2 ограничивает обход.

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

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.