在Access中可以关闭全局函数中的变量吗？

在我的访问程序中，如果他们想要保存，每次他们关闭程序时都会询问用户。这可以从任何形式完成。出现这个问题是因为我想创建一个全局函数来减少重复代码。这将如何完成？在类模块中？（这是怎么设置的？）在Access中可以关闭全局函数中的变量吗？

如果它可以帮助我的代码如下;

If Me.Dirty Then 
Dim LResponse As Integer 

LResponse = MsgBox("You have unsaved changes. Do you really want to close the database", vbYesNo, "Close form") 

If LResponse = vbYes Then 
    DoCmd.Close 
    Cancel = True 
End If 
Else 
DoCmd.CloseDatabase 
End If

来源

2017-08-30 Everton

我会问你问以前的问题的同样的问题：（1）你的班级做什么？（2）与用户所在表单关联的是什么？（3）你的代码的哪个部分试图调用类“Close”函数？（我从一个评论中感受到，当用户试图关闭表单时，你试图关闭这个类。）（4）Close函数实际是在一个类中，还是在一个标准的代码模块中？ – YowE3K

绑定窗体在默认情况下会在关闭时保存更改的数据，因此您不需要所有这些。

因此，所有你需要的是一个单一的代码行：

DoCmd.Quit

如果系统希望特性或行为添加到窗体或控件，使用WITHEVENTS。

可以找到一个例子here。

来源

2017-08-31 08:02:30 Gustav

在Access中可以关闭全局函数中的变量吗？

回答

相关问题