ms-access - Numlock と CAPSLOCK が VBA Access で常にオンになっている

Question

こんにちは、VBA Access で作成されたフォームがあります。comboboz から値を入力または選択するか、値をテキストで入力すると、NUMLOCK キーと CAPSLOCK キーがオフになり、常にオンになるようにする方法がわかりません。

Answer 1

これには、 capslock、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 キーで遊ぶなど、他の楽しいことが利用できます。