HOME > 即効テクニック > AccessVBA > ユーザーインターフェース > 起動時にメインメニューを最大化して表示し、データベースを最小化する

即効テクニック

ユーザーインターフェース

起動時にメインメニューを最大化して表示し、データベースを最小化する

(Access 97)
[ツール(T)]メニューの[起動時の設定(U)]コマンドをクリックすると、[起動時の設定]ダイアログボックスが表示されます。[フォーム/ページの表示(O)]にメインメニューを設定すると、起動時に設定したフォームが表示されます。
メインメニューのイベント「開く時」に次のイベントプロシージャを作成します。

Private Sub Form_Open(Cancel As Integer)
    DoCmd.Minimize                 ←(1)
    
    DoCmd.SelectObject acForm, "フォーム1", True
    DoCmd.Maximize                 ←(2)
    
End Sub

Minimizeメソッドは、"Minimize/最小化"アクションを実行します。
"Minimize/最小化"アクションは、アクティブウィンドウを小型のタイトルバーに変えて、Accessウィンドウの下部に表示します。(1)で、データベースが最小化されます。
SelectObjectメソッドは、"SelectObject/オブジェクトの選択"アクションを実行します。
"SelectObject/オブジェクトの選択"アクションは、データベースオブジェクトを選択します。
Maximizeメソッドは、アクティブウィンドウを、Accessのウィンドウと同じ大きさに拡大するために使用する"Maximize/最大化"アクションを実行するので、SelectObjectメソッドでアクティブになったフォーム1が最大化されます(2)。