当 NumLock 关闭时需要在 Access 中发出警告

Question

我的一个数据库表单无法正常工作。我花了一段时间才意识到 NumLock 已关闭。当通过按键关闭 NumLock 时，有一些程序可以逆转该过程，但这可能不仅仅是意外按下关闭 NumLock 的键。在 MS Access 中，在 window 的右下角，如果它打开，您会看到 "NUM LOCK"，如果它关闭，则什么也没有。有没有办法，比如在 vba 中，如果单词 "NUM LOCK" 没有出现就发出警告？

Answer 1

GetNumlock = CBool(GetKeyState(vbKeyNumlock) And 1)

示例：

If (CBool(GetKeyState(vbKeyNumlock) And 1) = True
    MsgBox "NumLock is on." 
End If

当 NumLock 关闭时需要在 Access 中发出警告

Need a Warning within Access when NumLock is Off

ms-access

vba