Private Sub ss_Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles Me.KeyDown ‘对话框的KeyPreview属性需设置为True e.Handled = True If e.KeyValue = 27 Then Me.Close() End If End Sub
原文：https://www.cnblogs.com/rf8862/p/12274839.html