Question

vba 怎么用回车和esc操作窗体

如题，我怎么编码才能用回车和esc 操纵我编写的窗体

Answer 1

假设有一窗口frm
1、添加一按钮，假设名称是bt，将Cancel属性设置成True，bt_Click()事件中添加Unload Me；（此步骤针对窗口拥有焦点）
2、模块中建立如下过程（此步骤针对窗口不拥有焦点）
Sub unl()
Unload frm
End Sub
窗体初始化和关闭事件过程如下
Private Sub frm_Initialize()
Application.OnKey "{ESC}", "unl"
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Application.OnKey "{ESC}"
End Sub