窗体上有退出(cmdexit)按钮和测试按钮(cmdtest)以及一个文本框txt,当单击测试按钮时,弹出一个消息框,消息框中包括“确定”和“取消”按钮,若单击“确定”按钮则在文本框中显示“显示”,若单击“取消”按钮则在文本框中显示“取消”。单击退出按钮关

admin2010-03-22  21

问题 窗体上有退出(cmdexit)按钮和测试按钮(cmdtest)以及一个文本框txt,当单击测试按钮时,弹出一个消息框,消息框中包括“确定”和“取消”按钮,若单击“确定”按钮则在文本框中显示“显示”,若单击“取消”按钮则在文本框中显示“取消”。单击退出按钮关闭窗体。试将程序补充完整。
      Private sub cmdtest_click()
           answer=msgbox("显示钮按", vbOkCancel)
           If  【  】  then
                 txt="显示"
           Else
                 txt="取消"
           End If
     End sub
     Private sub cmdexit_click()
           【  】  
     End sub

选项

答案answer=vbOK ; docmd.close

解析 因为程序要求单击“确定”按钮显示“显示”两个字,因此判断条件为answer= vbOK,单击退出按钮关闭窗体,因此用docmd.close。
转载请注明原文地址:https://kaotiyun.com/show/kawp777K
0

最新回复(0)