我正在完成一个程序，并希望为＆＃34;关于＆＃34;做一些花哨的事情。标签。我是复活节彩蛋的忠实粉丝，并且想做一些很酷的事情。我的想法是当按下按钮时，运行一个函数来对单元格进行彩色拼贴，而msgbox pop则说“＃34;嘿谢谢你使用我的程序＆＃34;或类似的东西，然后功能一旦msgbox＆＃34; ok＆＃34;已被点击。有没有简单的方法来做到这一点？它并不是非常重要，但它对未来的应用程序也非常有用。
这里有点我想要的东西：
do while msgbox <> ok
'something amazing I guess
next
我找不到任何类似的东西;话虽如此，我可能不会问正确的问题。提前谢谢！
答案 0 :(得分：1)
在我看来，您可以执行在Click事件上打开的非模态表单，例如：
Do While msgbox("Hey thanks for using my Kick-ass," & Vbcrlf & _
" better then you ever thought possible program",vbokonly,"Title of Program here") <> vbok
'tell you form do colour tiles and any form of magic you want here
next
Vbok，是Msgbox返回的内容。