窗体上有两个按钮：显示(cmdshow)按钮和测试按钮(cmdtest)，显示按钮初始状态不可见，当单击测试按钮，弹出一个消息框，包括“确定”和“取消”按钮，若单击“确定”则显示“显示”按钮，若单击“取消”则关闭窗体。试将程序补充完整。

Private sub cmdtest_click( )

answer = msgbox ( "显示按钮", vbOkCancel)

If answer = vbOK then

cmdshow. visible = [ ]

E．lse

docmd. close

E．nd If

E．nd sub