vb.net - 如何在 Visual Basic 的 KeyDown 中将变量转换为双精度（KeyValue）

Question

我有这个代码：

Private Sub key(sender As Object, e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown
    If e.KeyValue = Keys.Enter Then
        If FuSt = False Then
            FuSt = True
            My.Computer.Audio.Play(My.Settings.Full)
        Else
            FuSt = False
            My.Computer.Audio.Play(DIRECOTRY)
        End If
    End If
    If e.KeyValue = b1 Then
        My.Computer.Audio.Play(SoundsDir & "1.wav")
    End If
End Sub

但是当我想玩 b1 （键盘上的 Z 按钮）时，我遇到了这个错误：

从“z”到 Double 的对话是不正确的（有些想法）

你能帮助我吗？

Answer 1

要将键分配给变量 b1 尝试如下所述。

Keys是一个枚举。

Dim b1 As Keys
b1 = Keys.Z

像  Hans Passant评论一样，如果你想使用KeyPress事件（推荐），试试下面的代码。

   Private Sub Form1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles Me.KeyPress
        If e.KeyChar = Char.ToLower(ChrW(Keys.Z)) Then
            MsgBox("Z selecetd")
        End If
    End Sub

或者，如果您想参加KeyDown活动，请尝试以下代码。

Private Sub Form1_KeyDown(sender As Object, e As KeyEventArgs) Handles MyBase.KeyDown
    If e.KeyCode.Equals(Keys.Z) Then
        MsgBox("Z selecetd")
    End If
End Sub