Visual Basic PInvokeStackImbalance wurde erkannt. ? wie beheben?

[♠As♠]

Hi,
ich wollte meinem Script eine Taste zuweisen F12 nur dann kommt

PInvokeStackImbalance wurde erkannt.
Message: Ein Aufruf an die PInvoke-Funktion "WindowsApplication6!WindowsApplication6.Form1::Ge tAsyncKeyState" hat das Gleichgewicht des Stapels gestört. Wahrscheinlich stimmt die verwaltete PInvoke-Signatur nicht mit der nicht verwalteten Zielsignatur überein. Überprüfen Sie, ob die Aufrufkonvention und die Parameter der PInvoke-Signatur mit der nicht verwalteten Zielsignatur übereinstimmen.

Ich habe im Internet mal nachgesehen aber nicht wirklich verstanden wsa die lösung ist.

Mein Scipt

 Spoiler

Public Class Form1
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKeys As Long) As Integer
Dim Xwert As String = 0
Dim Ywert As String = 0

Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
Dim Hotkey1 As Boolean

Label4.Text = Cursor.Position.X
Label5.Text = Cursor.Position.Y

Hotkey1 = GetAsyncKeyState(Keys.F12)
If Hotkey1 = True Then
MsgBox("X:" & Cursor.Position.X & "Y:" & Cursor.Position.Y)

End If

End Sub
End Class

[nkkk]

versuch
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKeys As Int) As Integer
statt:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKeys As Long) As Integer
Edit:

Überprüfen Sie, ob die Aufrufkonvention und die Parameter der PInvoke-Signatur mit der nicht verwalteten Zielsignatur übereinstimmen.

[♠As♠]

Tausend dank