设置:
窗体--其他-弹出方式: 改为'是'
模式: 改为'是' --- 用户无法看到其他对象(表,窗体,查询。。。)
在窗体装载的时候:
DoCmd.RunCommand acCmdAppMinimize --- 最小化应用界面
在窗体关闭的时候:
DoCmd.Quit acQuitSaveNone
或
Application.Quit acQuitSaveNone ---- 关闭时默认不保存
设置:
窗体--其他-弹出方式: 改为'是'
模式: 改为'是' --- 用户无法看到其他对象(表,窗体,查询。。。)
在窗体装载的时候:
DoCmd.RunCommand acCmdAppMinimize --- 最小化应用界面
在窗体关闭的时候:
DoCmd.Quit acQuitSaveNone
或
Application.Quit acQuitSaveNone ---- 关闭时默认不保存