Access窗体Min Max Buttons属性失效 仅显示关闭按钮如何解决？

1 修正基础属性配置 #

你之前的属性设置需要调整为如下值，避免多余控件干扰全屏效果：

• Min Max Buttons = None
• Control Box = Yes
• Border Style = Dialog
• Auto Resize = Yes
• Auto Center = Yes

2 加载时强制全屏VBA代码 #

打开窗体设计视图，按Alt+F11进入VBA编辑器，在窗体的Load事件中添加如下代码，直接适配屏幕分辨率实现全屏，同时隐藏Access主界面元素：

Private Sub Form_Load()
    ' 隐藏功能区与导航窗格
    Application.DoCmd.ShowToolbar "Ribbon", acToolbarNo
    Application.NavigationPane = False
    
    ' 强制窗体铺满整个屏幕
    Me.Move 0, 0, Screen.Width, Screen.Height
End Sub

3 解决DoCmd.Restore无效问题 #

DoCmd.Restore默认作用于Access主窗口而非当前窗体，若需要实现关闭窗体后恢复Access默认界面，在窗体的关闭事件中添加如下代码即可：

Private Sub Form_Close()
    ' 恢复Access主界面显示
    Application.DoCmd.ShowToolbar "Ribbon", acToolbarYes
    Application.NavigationPane = True
End Sub

多窗体批量设置方法 #

如果所有窗体都需要实现该效果，将上述VBA逻辑封装为公共函数，在每个目标窗体的Load和Close事件中直接调用即可，无需重复编写代码。

内容的提问来源于stack exchange，提问作者liz