使用ESC关闭

  1. 在窗体上拖一个按钮控件，命名为 btnCancel，然后将按钮属性 Cancel 设为 True
  1. 然后双击按钮，在按钮的 click 事件中写入 Me.Hide
1
2
3
Private Sub btnCancel_Click()
    Me.Hide
End Sub
  1. 然后把按钮 Width 和 Height 设置为 0

相关链接

  1. 窗体上按Esc键关闭窗体（VBA）
=================我是分割线=================

欢迎到公众号来唠嗑: