Warning: file_get_contents(/data/phpspider/zhask/data//catemap/0/vba/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vba Me.undo在关闭表单时防止更改_Vba_Ms Access - Fatal编程技术网

Vba Me.undo在关闭表单时防止更改

Vba Me.undo在关闭表单时防止更改,vba,ms-access,Vba,Ms Access,我想使用ME.UNDO命令在Access 2013中关闭表单时防止更改 我有一个表单链接到一个包含工作列表的表。此表单为只读,以防止意外更改 要进行更改,用户需要双击某个项目以打开与此特定工作项目相关的另一个表单,然后对其进行更改。 我有一个保存按钮供用户单击以保存更改。如果用户刚刚关闭此表单,我不想保存更改 我正在关闭事件中使用me.undo(这是该事件中唯一的代码行)。它仍在工作列表表单中保存更改。如果您只编写一条记录,并且希望在关闭时删除该记录,请尝试此操作。但是首先,删除OnClose事

我想使用
ME.UNDO
命令在Access 2013中关闭表单时防止更改

我有一个表单链接到一个包含工作列表的表。此表单为只读,以防止意外更改

要进行更改,用户需要双击某个项目以打开与此特定工作项目相关的另一个表单,然后对其进行更改。
我有一个保存按钮供用户单击以保存更改。如果用户刚刚关闭此表单,我不想保存更改


我正在关闭事件中使用
me.undo
(这是该事件中唯一的代码行)。它仍在工作列表表单中保存更改。

如果您只编写一条记录,并且希望在关闭时删除该记录,请尝试此操作。但是首先,删除OnClose事件,注意这会在表单的卸载事件上触发

Private Sub Form_Unload(Cancel As Integer) 
   On Error Resume Next 
   DoCmd.SetWarnings False
   DoCmd.RunCommand (acCmdUndo)
   DoCmd.SetWarnings True 
End Sub

如果用户可以创建多个记录,那么这将只删除插入的最后一行

普卢松赢得了自我挫败的头衔
如果Me.undone,那么WoeIsMe
你不能在close事件中使用undo-那太晚了。看看这篇文章: