如何使keypress（keydown）关闭程序

Question

我目前正在为VB.NET中的项目编写代码，如果你点击＆＃34; escape＆＃34;按钮，你得到一个消息框说＆＃34;这退出程序，你想离开吗？ ＆＃39; Y＆＃39;或者＆＃39; N＆＃39;＆＃34;。我会编写什么代码来使它成为如果你点击＆＃34; Y＆＃34;该计划结束？

这是我到目前为止所做的：

Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
    If e.KeyCode = Keys.Escape Then
        MsgBox("This button exits the program. Do you want to exit the program?")
        If Button = e.KeyCode = Keys.Y Then
            End
        End If
    End If
End Sub

Answer 1

这将为您提供以下内容：

Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles Me.KeyDown
    If e.KeyCode = Keys.Escape Then
        If MessageBox.Show("message", "caption", MessageBoxButtons.YesNo) = Windows.Forms.DialogResult.Yes Then
            Close()
        End If
    End If
End Sub

屏幕截图显示按 Esc 按钮时的外观：

Answer 2

试试这个

{{1}}

Answer 3

  Private Sub Form1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown

  Select Case e.KeyCode

       Case Keys.Escape

            Msgbox("Close",vbInformation)
            Me.Close()

   End Select

  End Sub

希望这有助于作为指导。