Question

vba中的窗口，如何用esc键实现 窗口右上角的那个关闭功能。（不添加命

vba中的窗口，如何用esc键实现 窗口右上角的那个关闭功能。（不添加命令按钮的情况下）

Answer 1

　　题主，你是说打开用户窗体后，可能按ESC键退出当前的窗体吧，而且用户窗体上没有退出的按钮对吧~~

　　我也建了个这样的用户窗体，然而并不是想象中的那样的哈。

　　先说下怎么弄：

　　1.添加一个小的命令按钮CancelButton，将它的Cnacel属性设置为True，然后把下面的事件处理程序插入到用户窗体的代码模板中：

　　    Private Sub CancelButton_Click()

　　Unload Me

　End Sub

2.上述即可允许用户按ESC键来退出窗体。然后可以把这个小按钮隐藏在另一个对象的后面，或是放在窗体的右下角然后缩小窗体的大小，这样就看不到它了。




以上，即是实现的方法，也就是还是需要一个命令按钮来实现这个功能，但是人为隐藏了。这个也是Excel2013 高级VBA编程宝典（第七版）中讲到的方法。　　

追问

就是说，在不添加任何commandbutton 情况下，单纯的用esc 实现 窗口右上角的关闭，不行是吗

Answer 2

代码写end cancel设置为true即可