表单 – 关闭当前表单并在Access中打开另一个表单？

发布时间：2020-12-14 18:58:11 所属栏目：资源来源：网络整理

导读：我正在尝试创建一个关闭当前表单并打开主窗体的宏. 由于我有这么多表单,并且我需要在所有表单中使用相同的按钮,我想创建一个宏,而不是单独创建每个表单. 有没有办法这样做？解决方法创建代码模块并添加以下函数： Public Sub CloseMeAndOpenMain(frmMe As

我正在尝试创建一个关闭当前表单并打开主窗体的宏.

由于我有这么多表单,并且我需要在所有表单中使用相同的按钮,我想创建一个宏,而不是单独创建每个表单.

有没有办法这样做？

解决方法

创建代码模块并添加以下函数：

Public Sub CloseMeAndOpenMain(frmMe As Form)
    DoCmd.Close acForm,frmMe.Name
    DoCmd.OpenForm "frmMain" 'Replace this with the actual name of your Main form
End Sub

现在,每次有一个应该关闭当前表单并打开“frmMain”表单的按钮时,您将编写click事件处理程序,如下所示：

Private Sub btnCloseForm_Click()
    CloseMeAndOpenMain Me
End Sub

我是对当前表单的引用,每个表单都有一个Name属性.因此,您可以编写一个函数来关闭它,而不必将名称硬编码为String(主要表单当然除外).

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!