アクセスの見た目だけです。
開いたとき、余計なところをいじられない為にもなります。

起動時の設定による変更

通常通りアクセスを開き、フォームを開いた状態です。
これを右図のようにします。

→

【ツール】 → 【起動時の設定】で開いたダイアログの、下図チェックボックスにより表示/非表示の設定が出来ます。


また、フォームのプロパティを開き、下図設定を『いいえ』にすることにより表示/非表示の設定が出来ます。

フォームを最大にし、メニューバーを非表示

フォームのプロパティを開き、イベントの設定をする。
【開く時】の設定で『イベントプロシージャ』を選択。
イベントに下記を追加する。

Private Sub Form_Open(Cancel As Integer) Application.CommandBars("Menu Bar").Enabled = False DoCmd.Maximize End Sub

フォームサイズによって部品の位置を変える

Private Sub Form_Resize() Dim ScreenWidth As Integer ScreenWidth = Screen.ActiveForm.WindowWidth / 2 - 3000 If ScreenWidth >= 0 Then Me!コマンド0.Left = ScreenWidth Else Me!コマンド0.Left = 100 End If End Sub

4行目は、部品を配置したい位置(左部分)の位置情報。
   ※『Screen.ActiveForm.WindowWidth / 2』で、画面の中心位置を取得。
      -3000は、部品の大きさによって変える。