2016-07-28 38 views
-1

我在Access 2007中退出按钮叫cmdQuit -我怎样才能得到一个“你确定要退出YES/NO”的提示上的访问按钮

怎么会这样它带来了一个我可以拥有它请按照 的提示提示您确定要退出吗?是/否

这样它不会自动退出日志表单?

我这是我的命令:

私人小组cmdQuit_Click()

If MsgBox("Are you sure that you want to close this form?", vbYesNo) = vbYes Then 
    Exit Sub 
Else 
    Cancel = True 
End If 

末次

所以提示工作,但是是的任何部分,然后退出部分不

谢谢 丹

+0

你在哪里关闭窗体?即你在哪里调用'DoCmd.Close'? – Heinzi

+0

该表单反复使用以便快速登录到SQL数据库,因此它实际上并没有自然的关闭点。如果我删除上面的代码,那么退出按钮就像预期的那样关闭。 所以我需要在按钮本身设置一个命令? –

回答

0

现在我已经解决了它 - 这是如下:

私人小组cmdQuit_Click()

如果MSGBOX( “你确定要关闭这个形式?”,vbYesNo)= vbYes然后 的DoCmd .Quit 否则 取消=真 结束如果

结束子

只好退出小组代替退出命令

由于 丹

0

也有做这使得它有点清洁,并没有给我“的Microsoft Access”部分AT)提示

私人小组cmdQuit_Click(顶部

的另一种方式

如果MSGBOX( “你确定要关闭此记录?”,vbYesNoCancel,PraiseLogger)= vbYes然后 DoCmd.Quit 否则:取消=真 结束如果

末次

感谢 丹

1

没有什么要取消的,因此,所有你需要的是这样的:

Private Sub cmdQuit_Click() 

If MsgBox("Are You Sure You Want To Close This Logger?", vbQuestion + vbYesNo, PraiseLogger) = vbYes Then 
    DoCmd.Quit 
End Sub 
相关问题