Propriété Cycle – Exemple

L’exemple suivant définit la propriété Cycle pour un frame et deux objets Page dans un objet MultiPage.

Pour utiliser cet exemple, copiez le code de l’exemple dans la partie Déclarations d’un formulaire. Vérifiez que le formulaire contient :

• un Frame nommé Frame1 ;
• un MultiPage nommé MultiPage1 qui contient deux objets nommés Page1 et Page2 ;
• Deux contrôles CommandButton nommés CommandButton1 et CommandButton2.

Dans le formulaire, le frame et chaque page de la multipage placent quelques contrôles, ce qui vous permet de voir comment Cycle affecte l’ordre de tabulation du frame et du multipage.

L’utilisateur doit parcourir les contrôles avec la touche de tabulation afin d’observer l’impact de Cycle sur l’ordre de tabulation. Une pression sur CommandButton1 étend l’ordre de tabulation de façon à inclure les contrôles dans les objets Frame et Page. Une pression sur CommandButton2 restreint l’ordre de tabulation.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.