主要用到函数说明：
MxDrawXCustomEvent::KeyUp
键盘按钮被释放，详细说明如下：
| 参数 | 说明 |
|---|---|
| iVk |
是按钮码，如F8,的值为#define VK_F8 0x77 |
返回0消息继续往下传递,返回1消息不往下传递。
VB代码实现如下：
|
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
Private Sub MxDrawX1_CustomEvent(ByVal sEventName As String)
If sEventName =
"KeyUp"
Then
Dim param As MxDrawXLib.MxDrawResbuf
' 得到事件参数
Set param = MxDrawX1.CustomEventParam
Dim lVk As Long
lVk = param.AtLong(0)
'
#define VK_F1 0x70,十进制值:112
If lVk = 112 Then
MsgBox
"F1释放"
End If
End If
|