ms-access - Access VBA 按键

Question

当我的光标在我的文本框上并按下按钮“+”时，该文本框的值必须增加 1

所以我尝试的是使用 MouseMove 但问题是我无法使用 OnkeyPress 函数中的 KeyAscii 函数

If KeyAscii = vbKeyL Then
    Stock.Value = Stock.Value + 1
End If

如果您有任何想法，您可以自由发表!
提前谢谢。

Answer 1

正确答案是:
将 key 预览放在表单中的 Yes 上，启用文本框:False

而不是在 keyDown 事件中:

Select Case KeyCode
        Case vbKeyAdd

             Stock.Value = Stock.Value + 1
    End Select