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


Пример использования свойства Cycle

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

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

  • Frame с именем Frame1.
  • Объект типа MultiPage с именем MultiPage1, содержащий два объекта с именами Page1 и Page2.
  • Два элемента управления CommandButton с именами CommandButton1 и CommandButton2.

В форме рамка и каждая страницаMultiPage размещают несколько элементов управления, чтобы вы могли увидеть, как Цикл влияет на порядок табуляции для frame и MultiPage.

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

Private Sub RestrictCycles() 
'Limit tab order for the Frame and Page objects 
 Frame1.Cycle = fmCycleCurrentForm 
 MultiPage1.Page1.Cycle = fmCycleCurrentForm 
 MultiPage1.Page2.Cycle = fmCycleCurrentForm 
End Sub 
 
Private Sub UserForm_Initialize() 
 RestrictCycles 
End Sub 
 
Private Sub CommandButton1_Click() 
'Extend tab order subforms (the Frame and Page 
'objects) 
 Frame1.Cycle = fmCycleAllForms 
 MultiPage1.Page1.Cycle = fmCycleAllForms 
 MultiPage1.Page2.Cycle = fmCycleAllForms 
End Sub 
 
Private Sub CommandButton2_Click() 
 RestrictCycles 
End Sub

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

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