如果关闭表单后未打开任何表单,请打开特定表单

时间:2019-04-17 12:09:45

标签: ms-access access-vba

我有一个数据库,该数据库具有分布在整个数据库中的多个小表格(我以为是,我以为是,哈哈)。有多种方法可以获取多种不同的表单,但是我遇到了一个导航问题,即在某些情况下,当用户关闭表单时,没有其他打开或打开的状态。因此,理想情况下,我希望Access在任何给定的时刻检查是否打开了任何表单,如果没有,则打开特定的表单(数据库“主”表单)。我用这个搜索了谷歌,却找不到我想要的东西(可能是我用谷歌搜索了错误的东西?),所以说实话,我真的不知道从哪里开始。

我想创建一个在Form_Close上执行的函数,以检查当前是否打开了任何窗体,如果没有,则打开一个特定的窗体。再次,我什至不知道该从哪里开始寻找答案,所以我真的没有什么可以开始的旅程。

1 个答案:

答案 0 :(得分:2)

一个简单的方法是:

在标准模块中添加此过程,并在其中编辑主表单名称:

Public Function OpenMainFormIfThisIsTheLastForm()
    If Forms.Count = 1 Then DoCmd.OpenForm "YourMainForm"
End Function

在每种要关闭主窗体的表单中,先将其放置在On Close事件中:

=OpenMainFormIfThisIsTheLastForm()

那应该是全部。