我想在程式中利用鍵盤的向上和向下翻頁健，在pb選單定義中沒有看到這兩個健！所以不知道怎樣定義？請高手指點，
本人感激不盡！！！！
QQ：634287660
uj5u.com熱心網友回復：
我剛才試了下，沒效果：將PageDown或PageUp設為選單的快捷鍵后，沒反應。我設定的方法是：Edit Source，找到選單項，在選單項的設定中加：this.shortcut = 33（PageUp的虛擬鍵值）。
其他的鍵，這樣設好后就可以了，但這兩鍵不行！
uj5u.com熱心網友回復：
可以實現的﹐我給你一段代碼﹐你仔細琢磨就明白怎么寫了﹐在DW自定義一個事件ue_keypress, 事件ID:pbm_dwnkey//DW的按鍵觸發視窗的按鍵
//注﹕F1~F4, 是保留功能鍵
window lw_parent
If Key = KeyF5! or Key = KeyF6! or Key = KeyF7! &
or Key = KeyF8! or Key = KeyF9! or Key = KeyF11! or Key = KeyF12! or Key = Keyescape! Then
of_getparentwindow(lw_parent)
lw_parent.event key(key,keyflags)
End If
//====================================================================
// 用左右箭頭鍵實現Tab前后移動的功能
//====================================================================
Integer VK_TAB = 09
Integer VK_SHIFT = 16
If ib_arrowenable Then
If Key = KeyLeftArrow! Then
keybd_event(VK_SHIFT,0,0,0) //按下shift
keybd_event(VK_TAB,0,0,0) //按下tab
keybd_event(VK_TAB,0,2,0) //釋放tab
keybd_event(VK_SHIFT,0,2,0) //釋放shift
Return 1
End If
If Key = KeyRightArrow! Then
keybd_event(VK_TAB,0,0,0) //按下tab
keybd_event(VK_TAB,0,2,0) //釋放tab
Return 1
End If
End If
//模擬鍵位碼對照表﹕
/*
A 65 0 96 F1 112 Backspace 8
B 66 1 97 F2 113 Tab 9
C 67 2 98 F3 114 Clear 12
D 68 3 99 F4 115 Enter 13
E 69 4 100 F5 116 Shift 16
F 70 5 101 F6 117 Control 17
G 71 6 102 F7 118 Alt 18
H 72 7 103 F8 119 Caps Lock 20
I 73 8 104 F9 120 Esc 27
J 74 9 105 F10 121 Spacebar 32
K 75 * 106 F11 122 Page Up 33
L 76 + 107 F12 123 Page Down 34
M 77 Enter 108 -- -- End 35
N 78 - 109 -- -- Home 36
O 79 . 110 -- -- Left Arrow 37
P 80 / 111 -- -- Up Arrow 38
Q 81 -- -- -- -- Right Arrow 39
R 82 -- -- -- -- Down Arrow 40
S 83 -- -- -- -- Insert 45
T 84 -- -- -- -- Delete 46
U 85 -- -- -- -- Help 47
V 86 -- -- -- -- Num Lock 144
W 87
X 88
Y 89
Z 90
0 48
1 49
2 50
3 51
4 52
5 53
6 54
7 55
8 56
9 57
*/
uj5u.com熱心網友回復：
嗯，用這個辦法也不錯！
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/99383.html
標籤：控件與界面