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

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 

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