docmdclose语句出错推出窗口需要确认时?

pxsj

游客，如果您要查看本帖隐藏内容请回复

窗体就一个按钮 单击事件为:docmd.close,窗体卸载事件写了:If MsgBox("你真的要退出吗？", vbYesNo + vbQuestion, "请确认…") = vbNo Then Cancel = True.

如果推出窗体时点击确认,没有问题,点击取消报错:运行时错误'2501'这个close被取消.需要调试或者结束,请教高手这个是哪有问题了,卸载事件是以前看的某位网友提供的语句,不记得在哪看见的了.请帮忙找个办法,我需要在窗体退出时能够选择确定或者取消.谢谢.

pxsj

抱歉 发错版了.请帮忙删除.谢谢.