MSWord中VBA编辑器外部的KeyPress事件失败

Question

我有一个VBA代码和部分代码，特别是当它在MS Word的VBA编辑器中运行时，空格键按键事件有效（尽管并非总是如此）。但是在外部，即如果我将模块包含在normal.dotm中或将其作为.dotm放在MS Word的STARTUP文件夹中，然后将该宏分配给MS Word中的按钮并尝试运行它，则代码无法正常工作。该代码有效，但是处理空格键按键事件的部分无效。

我正在使用MS Office 2010版本14.0.7229.5000（64位）。如果有问题，所有MS Office应用程序都在服务器上运行，我们正在客户端通过RDP协议访问这些应用程序。

声明部分

    #If VBA7 Then
    Private Declare PtrSafe Function GetAsyncKeyState Lib "user32" (ByVal vKey As 
    Long) As Integer
    #End If
    Private Const VK_SPACE = &H20

以及应该处理按键事件的部分

    Do Until GetAsyncKeyState(VK_SPACE)
        'exit when Spacebar key is pressed
        DoEvents
    Loop