<DllImport("Kernel32")> Private Shared Function LoadLibrary(ByVal dllfile As String) As System.IntPtr
End Function
<DllImport("Kernel32")> Private Shared Function GetProcAddress(ByVal hModule As System.IntPtr, ByVal lpProcName As String) As System.IntPtr
End Function
<DllImport("Kernel32")> Private Shared Function FreeLibrary(ByVal hModule As System.IntPtr) As Boolean
End Function
Public Delegate Function pDD_btn(ByVal btn As Int32) As Int32
Public Delegate Function pDD_whl(ByVal whl As Int32) As Int32
Public Delegate Function pDD_key(ByVal keycode As Int32, ByVal flag As Int32) As Int32
Public Delegate Function pDD_mov(ByVal x As Int32, ByVal y As Int32) As Int32
Public Delegate Function pDD_chk() As Int32
Public Delegate Function pDD_str(ByVal instr As String) As Int32
Public Delegate Function pDD_todc(ByVal vk As Int32) As Int32
Public Delegate Function pDD_movR(ByVal dx As Int32, ByVal dy As Int32) As Int32
Public btn As pDD_btn ' 鼠标点击
Public whl As pDD_whl ' 鼠标滚动
Public mov As pDD_mov ' 绝对鼠标移动
Public movR As pDD_movR ' 相对鼠标移动
Public key As pDD_key ' 键盘按键
Public chk As pDD_chk ' 驱动检测
Public str As pDD_str ' 键盘字符
Public todc As pDD_todc ' 转换虚拟键码到DD码

我比较好奇，这个插件很好用么？

提示代码是这样的
Private Declare Function DD_mov Lib "DD32.dll" (ByVal x As Long, ByVal y As Long) As Long
Private Declare Function DD_movR Lib "DD32.dll" (ByVal dx As Long, ByVal dy As Long) As Long
Private Declare Function DD_btn Lib "DD32.dll" (ByVal btn As Long) As Long
Private Declare Function DD_whl Lib "DD32.dll" (ByVal whl As Long) As Long
Private Declare Function DD_key Lib "DD32.dll" (ByVal key As Long, ByVal flag As Long) As Long
Private Declare Function DD_str Lib "DD32.dll" (ByVal str As String) As Long
Private Declare Function DD_todc Lib "DD32.dll" (ByVal todc As Long) As Long
PutAttachment ".", "*.dll"
Call DD_movR(20, 20)
可是按键精灵调试没反应

楼主解决了吗