[ツール(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)。
|