如果在关闭表单时没有打开表格,请打开特定表格

问题描述 投票:0回答:1

我有一个数据库,在数据库中分布着多个小形式(大多数是我假设的,哈哈)。有多种方法可以获得多种不同的形式,但是我遇到了一些导航问题,在某些情况下,当用户关闭表单时,没有其他任何打开或打开。所以我理想地喜欢Access来检查是否有任何表格在任何特定时刻打开,如果没有,那么打开一个特定的表格(数据库“主”表格)。我搜索了这个,找不到我要找的东西(可能我写错了吗?),所以老实说我真的不知道从哪里开始。 我想创建一个我在Form_Close上执行的函数,以检查当前是否有任何表单是打开的,如果没有,则打开一个特定的表单。再说一遍,我甚至都不确定在哪里开始寻找这个答案,所以我真的没有什么可以开始我的旅程了。

ms-access access-vba
1个回答
2
投票

一个简单的方法是:

在标准模块中添加此过程并在其中编辑主窗体名称:

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

在每个表单中,您希望在自身关闭之前打开主表单,将其放在On Close事件中:

=OpenMainFormIfThisIsTheLastForm()

这应该是全部。

© www.soinside.com 2019 - 2024. All rights reserved.