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.