Numlock和CAPSLOCK在VBA Access中始终打开

Question

您好我有一个用VBA Access编写的表单，当我输入或选择一些来自comboboz或文本的值时，我的NUMLOCK和CAPSLOCK键都会关闭，如何让它们总是打开，我不能怎么样？

Answer 1

this的代码会检查并设置大写， numlock 和 scrolllock 。

它使用Windows API

  Private Declare Function GetKeyboardState Lib "user32" _
     (pbKeyState As Byte) As Long
  Private Declare Function SetKeyboardState Lib "user32" _
     (lppbKeyState As Byte) As Long

检查并设置键盘状态 - 使用此API，可以使用其他有趣的东西，例如使用Windows键进行播放。