vba - 如何检测特定键是否被按下？

Question

我想知道是否有一种方法可以检测是否按下了特定键(例如退格键)。这就是我拍摄的目的:

Private Sub SomeTextBox_Change()

    If len(Me.SomeTextBox.Value) = 3 and KEYPRESSED is NOT BACKSPACE Then
         <.......Code Here>
    Else
         <.......Code Here>
    End if

End Sub

Answer 1

您应该使用 KeyPress 事件而不是 Change 事件:

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

    If Len(Me.SomeTextBox.Value) = 3 And KeyAscii <> 8 Then 'Backspace has keycode = 8.
         <.......Code Here>
    Else
         <.......Code Here>
    End If

End Sub

您可以在此处找到 key 代码的完整列表:http://www.asciitable.com/