Cycle プロパティの例

次の例では、Frame オブジェクトと MultiPage 内の 2 つの Page オブジェクトの Cycle プロパティを定義します。

この例を使用するには、以下のサンプル コードをフォームの宣言部分にコピーします。 フォームに以下のものが含まれていることを確認してください。

  • フレーム ( Frame ) コントロール (Frame1)
  • 2 つのオブジェクト (Page1 と Page2) を含むマルチ ページ ( MultiPage ) コントロール (MultiPage1)
  • 2 つのコマンド ボタン ( CommandButton ) コントロール (CommandButton1 と CommandButton2)

フォームでは、MultiPage の Frame と各ページに 2 つのコントロールが配置されるため、FrameMultiPage のタブ オーダーに対する Cycle の影響を確認できます。

ユーザーは、Tab キーを押してコントロール間を移動することで、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 のサポートおよびフィードバックを参照してください。