Question

access怎样做到关闭主窗体但不退出数据库,只有单击主窗体上的关闭按钮才退出数据库?

我在主窗体上设计了两个按钮，【打开子窗体按钮】和【退出按钮】，单击【打开子窗体按钮】时，子窗体打开同时主窗体关闭。单击【退出按钮】时退出数据库。
现在是单击主窗体右上角的X【关闭】，只是关闭窗体不会退出数据库。
怎样能做到只有点击【关闭】按钮或者窗体上的【退出按钮】才可以退出数据库，但在其它命令中执行的关闭窗体命令，只关闭窗体不退出数据库。
我是隐藏了access设计窗体，只有用户窗体即【窗体1】 如果我在【窗体1】关闭事件中写入代码：DoCmd.Quit 。那么就会出现当我点击【打开窗体】按钮或【按检修人员查询检修记录】按钮时，也退出了access数据库。因为在两个按钮当中都写入了关闭【窗体1】然后打开其它【窗体】的代码。 现在我怎样实现点击【窗体1】第关闭按钮能退出数据库，而在点击【打开窗体】或【按检修人员查询检修记录】时打开相应窗体，关闭【窗体1】，而不会退出access数据库？

Answer 1

现在是单击主窗体右上角的X【关闭】，只是关闭窗体不会退出数据库。
        怎样能做到只有点击【关闭】按钮或者窗体上的【退出按钮】才可以退出数据库，但在其它命令中执行的关闭窗体命令，只关闭窗体不退出数据库--你做个退出按钮,其他的不用管就行了,点蓝色退出主窗体,不退出数据库;点红黄退出数据库,都 是正常的

单击【打开子窗体按钮】时，子窗体打开同时主窗体关闭--不需要同时关掉主窗体

追问

如果我在【窗体1】关闭事件中写入代码：DoCmd.Quit 。那么就会出现当我点击【打开窗体】按钮或【按检修人员查询检修记录】按钮时，也退出了access数据库。因为在两个按钮当中都写入了关闭【窗体1】然后打开其它【窗体】的代码。

         

追答

Private Sub Command13_Click()
On Error GoTo Err_Command13_Click

    DoCmd.Quit

Exit_Command13_Click:
    Exit Sub

Err_Command13_Click:
    MsgBox Err.Description
    Resume Exit_Command13_Click
   

End Sub

点下主窗体,再点上方红的,查看代码

右键--属性,退出的编号为13

为什么在两个按钮当中都写入了关闭【窗体1】然后打开其它【窗体】的代码,这些按钮再做一遍,打开或关闭只选一种