비주얼베이직6.0 키값으로 명령하기
특정키를 눌렀을경우 어떤 역할을 하라는 명령은 어떻게 할까?..
아래 함수를 응용한다.
Private Sub ListView1_KeyPress(vbKeySpace As Integer)
'리스트뷰1번에서 스페이스를 누르면 아래의 포문을 실행하라는 함수다.
For intLoop = ListView1.ListItems.Count To 1 Step -1
ListView1.ListItems.Item(intLoop).Checked = False '체크된 체크박스를 강제로 false!
Next
End Sub
응용은 아래표의 "키보드 이벤트" 값을 "vbKeySpace"위치에 넣고 "ListView1"위치에는 실행할 작업의 위치를
넣어주면 된다. 아래표는 어떤분이 정리했는지 몰라도 참 고마울 따름이다..;;
|
키보드이벤트 |
값 |
설명 |
|
vbKeyA~Z |
65~90 |
A~Z |
|
vbKey0~y9 |
48~57 |
0~9 |
|
vbKeyF1~F16 |
112~127 |
F1키~F16키 |
|
vbKeyNumpad0~9 |
96~105 |
0키~9키 |
|
그외의 키들 | ||
|
vbKeyLButton |
1 |
마우스 왼쪽 단추 |
|
vbKeyRButton |
2 |
마우스 오른쪽 단추 |
|
vbKeyCancel |
3 |
취소키 |
|
vbKeyMButton |
4 |
마우스 가운데 단추 |
|
vbKeyBack |
8 |
<백스페이스>키 |
|
vbKeyTab |
9 |
<Tab>키 |
|
vbKeyClear |
12 |
<Clear>키 |
|
vbKeyReturn |
13 |
<Enter>키 |
|
vbKeyShift |
16 |
<Shift>키 |
|
vbKeyControl |
17 |
<Ctrl>키 |
|
vbKeyMenu |
18 |
<Menu>키 |
|
vbKeyPause |
19 |
<Pause>키 |
|
vbKeyCapital |
20 |
<Caps Lock>키 |
|
vbKeyEscape |
27 |
<Esc>키 |
|
vbKeySpace |
32 |
<스페이스바>키 |
|
vbKeyPageUp |
33 |
<Page Up>키 |
|
vbKeyPageDown |
34 |
<Page Down>키 |
|
vbKeyEnd |
35 |
<End>키 |
|
vbKeyHome |
36 |
<Home>키 |
|
vbKeyLeft |
37 |
<왼쪽 화살표>키 |
|
vbKeyUp |
38 |
<위쪽 화살표>키 |
|
vbKeyRight |
39 |
<오른쪽 화살표>키 |
|
vbKeyDown |
40 |
<아래쪽 화살표>키 |
|
vbKeySelect |
41 |
<Select>키 |
|
vbKeyPrint |
42 |
<Print Screen>키 |
|
vbKeyExecute |
43 |
<Execute>키 |
|
vbKeySnapshot |
44 |
<Snapshot>키 |
|
vbKeyInsert |
45 |
<Ins>키 |
|
vbKeyDelete |
46 |
<Del>키 |
|
vbKeyHelp |
47 |
<Help>키 |
|
vbKeyNumlock |
144 |
<Nun Lock>키 |
|
vbKeyMultiply |
106 |
곱하기 기호(*) 키 |
|
vbKeyAdd |
107 |
더하기 기호(+) 키 |
|
vbKeySeparator |
108 |
<Enter>키(숫자키 모음) |
|
vbKeySubtract |
109 |
빼기 기호(-) 키 |
|
vbKeyDecimal |
110 |
소수점(.)키 |
|
vbKeyDivide |
111 |
나누기 기호(/) 키 |