vba - 在访问表单中的消息框上单击“确定”时触发事件

Question

我有一个访问表单，在用户执行一些操作后，会出现一个消息框。当用户在消息框上单击“确定”时，我想关闭当前表单并打开一个新表单。我怎样才能做到这一点？

Answer 1

VBA 代码执行暂停，直到用户单击确定。因此，在 msgbox 调用之后的下一行代码将是你施展“魔法”的地方

您想先打开新表单，然后关闭当前表单。

Answer 2

您可以将代码直接放在 MsgBox 命令之后，也可以通过在多响应消息框中检查用户的响应来实现。例如：

    If MsgBox("Do you really want to continue?" & vbCrLf, vbYesNo) = vbYes Then 
        DoCmd.Close MyFormName
    Else
        ...Perform some other function 
    End If 

这将弹出一个带有 Yes 和 No 按钮的消息框，如果响应为 No，则允许您运行一些备用代码。