在VB.NET 2010中使用GetAsyncKeyState时发生PInvokeStackImbalance

Question

我正在尝试使用以下代码在主窗体上跟踪Ctrl + Tab按键

<DllImport("user32.dll", PreserveSig:=False)>
Private Shared Function GetAsyncKeyState(ByVal vKey As System.Windows.Forms.Keys) As Short
End Function

Private ReadOnly Property CtrlPressed As Boolean
    Get
        Dim keyval As Integer
        keyval = GetAsyncKeyState(Keys.ControlKey)
        If keyval = 0 Then
            CtrlPressed = False
        Else
            CtrlPressed = True
        End If
    End Get
End Property

但是，在调用属性CtrlPressed ，出现PInvokeStackImbalance错误。 我确定带有GetAsyncKeyState声明，并且已经导入了InteropServices但是CtrlPressed属性在语法上有问题。 我该如何解决这个问题？

谢谢

Answer 1

堆栈不平衡错误几乎总是意味着您的P / Invoke定义签名是错误的。 要做的第一件事是仔细检查所有类型，并确保它们与本机函数的文档签名相匹配。 在这种情况下，看起来不错。

除了您将PreserveSig设置为False ，我不确定为什么。 就像该字段的文档所指出的那样，该字段设计用于与返回错误代码（例如， HRESULT代码）的非托管方法一起使用。 它指示运行时将这些错误代码自动转换为异常。 但是GetAsyncKeyState方法不会返回错误代码，因此启用此选项没有多大意义。

以下代码对我来说很好用：

<DllImport("user32.dll")> _
Private Shared Function GetAsyncKeyState(ByVal vKey As Keys) As Short
End Function

Private ReadOnly Property IsCtrlPressed As Boolean
    Get
        Dim isPressed As Short = GetAsyncKeyState(Keys.ControlKey)
        Return (isPressed & &H8000) != 0
    End Get
End Property

确保您已经密切注意GetAsyncKeyState函数的文档 。 具体来说，关于返回值的部分：

如果函数成功，则返回值指定自上次调用GetAsyncKeyState以来是否按下了该键，以及该键当前处于向上还是向下。 如果设置了最高有效位，则该键处于按下状态；如果设置了最低有效位，则在上一次调用GetAsyncKeyState之后按下了该键。 但是，您不应该依赖于此最后的行为。 有关更多信息，请参见备注。

在以下情况下，返回值为零：

• 当前桌面不是活动桌面
• 前台线程属于另一个进程，并且桌面不允许挂钩或日志记录。