Обработка событий мыши и клавиатуры на vb6

11.06.2007, 18:18. **Показов** 2858. **Ответов** 2

Студворк — интернет-сервис помощи студентам

Нужна помощ,подскажите сайт или сбросте материал по теме: обработка событий мыши и клавиатуры на vbasik 6.0

@Pricolist · 12.06.2007, 15:27

на апи функциях кнопки ловятся так

Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
'///////Ловим кнопочки при свернутой проге/////////
Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
'Public Const VK_ADD = &H6B '[NUMPAD(+)]
'Public Const VK_ATTN = &HF6
'Public Const VK_BACK = &H8
'Public Const VK_CANCEL = &H3
'Public Const VK_CAPITAL = &H14
'Public Const VK_CLEAR = &HC
'Public Const VK_CONTROL = &H11
'Public Const VK_CRSEL = &HF7
'Public Const VK_DECIMAL = &H6E
'Public Const VK_DELETE = &H2E
'Public Const VK_DIVIDE = &H6F '[NUMPAD(/)]
'Public Const VK_DOWN = &H28
'Public Const VK_END = &H23
'Public Const VK_EREOF = &HF9
'Public Const VK_ESCAPE = &H1B
'Public Const VK_EXECUTE = &H2B
'Public Const VK_EXSEL = &HF8
'Public Const VK_F1 = &H70
'Public Const VK_F10 = &H79
'Public Const VK_F11 = &H7A
'Public Const VK_F12 = &H7B
'Public Const VK_F13 = &H7C
'Public Const VK_F14 = &H7D
'Public Const VK_F15 = &H7E
'Public Const VK_F16 = &H7F
'Public Const VK_F17 = &H80
'Public Const VK_F18 = &H81
'Public Const VK_F19 = &H82
'Public Const VK_F2 = &H71
'Public Const VK_F20 = &H83
'Public Const VK_F21 = &H84
'Public Const VK_F22 = &H85
'Public Const VK_F23 = &H86
'Public Const VK_F24 = &H87
'Public Const VK_F3 = &H72
'Public Const VK_F4 = &H73
'Public Const VK_F5 = &H74
'Public Const VK_F6 = &H75
'Public Const VK_F7 = &H76
'Public Const VK_F8 = &H77
'Public Const VK_F9 = &H78
'Public Const VK_HELP = &H2F
'Public Const VK_HOME = &H24
'Public Const VK_INSERT = &H2D
'Public Const VK_LBUTTON = &H1
'Public Const VK_LCONTROL = &HA2
'Public Const VK_LEFT = &H25
'Public Const VK_LMENU = &HA4
'Public Const VK_LSHIFT = &HA0
'Public Const VK_MBUTTON = &H4
'Public Const VK_MENU = &H12
'Public Const VK_MULTIPLY = &H6A '[NUMPAD(*)]
'Public Const VK_NEXT = &H22
'Public Const VK_NONAME = &HFC
'Public Const VK_NUMLOCK = &H90
'Public Const VK_NUMPAD0 = &H60
'Public Const VK_NUMPAD1 = &H61
'Public Const VK_NUMPAD2 = &H62
'Public Const VK_NUMPAD3 = &H63
'Public Const VK_NUMPAD4 = &H64
'Public Const VK_NUMPAD5 = &H65
'Public Const VK_NUMPAD6 = &H66
'Public Const VK_NUMPAD7 = &H67
'Public Const VK_NUMPAD8 = &H68
'Public Const VK_NUMPAD9 = &H69
'Public Const VK_OEM_CLEAR = &HFE
'Public Const VK_PA1 = &HFD
'Public Const VK_PLAY = &HFA
'Public Const VK_PAUSE = &H13
'Public Const VK_PRINT = &H2A
'Public Const VK_PRIOR = &H21
'Public Const VK_PROCESSKEY = &HE5
'Public Const VK_RBUTTON = &H2
'Public Const VK_RETURN = &HD
'Public Const VK_RCONTROL = &HA3
'Public Const VK_RIGHT = &H27
'Public Const VK_RMENU = &HA5
'Public Const VK_RSHIFT = &HA1
'Public Const VK_SCROLL = &H91
'Public Const VK_SELECT = &H29
'Public Const VK_SEPARATOR = &H6C
'Public Const VK_SHIFT = &H10
'Public Const VK_SNAPSHOT = &H2C
'Public Const VK_SPACE = &H20
'Public Const VK_STARTKEY = &H5B 'Start Menu(Наверное кнопка "ПУСК")
'Public Const VK_SUBTRACT = &H6D
'Public Const VK_TAB = &H9
'Public Const VK_UP = &H26
'Public Const VK_ZOOM = &HFB
'Public Const VK_0 = &H30
'Public Const VK_1 = &H31
'Public Const VK_2 = &H32
'Public Const VK_3 = &H33
'Public Const VK_4 = &H34
'Public Const VK_5 = &H35
'Public Const VK_6 = &H36
'Public Const VK_7 = &H37
'Public Const VK_8 = &H38
'Public Const VK_9 = &H39
'Public Const VK_A = &H41
'Public Const VK_B = &H42
'Public Const VK_C = &H43
'Public Const VK_D = &H44
'Public Const VK_E = &H45
'Public Const VK_F = &H46
'Public Const VK_G = &H47
'Public Const VK_H = &H48
'Public Const VK_I = &H49
'Public Const VK_J = &H4A
'Public Const VK_K = &H4B
'Public Const VK_L = &H4C
'Public Const VK_M = &H4D
'Public Const VK_N = &H4E
'Public Const VK_O = &H4E
'Public Const VK_P = &H50
'Public Const VK_Q = &H51
'Public Const VK_R = &H52
'Public Const VK_S = &H53
'Public Const VK_T = &H54
'Public Const VK_U = &H55
'Public Const VK_V = &H56
'Public Const VK_W = &H57
'Public Const VK_X = &H58
'Public Const VK_Y = &H59
'Public Const VK_Z = &H5A
 
 
 
 
 
 
 
 
 
If GetAsyncKeyState(vbKeyControl) And _
GetAsyncKeyState(vbKeyF12) Then
'...
'если нажали [Ctrl]+[F12], тогда ....

@Pricolist · 12.06.2007, 15:31

еще есть инфа по константам для KeyCode заходишь в бейсик жмешь F2 в поиске вводишь vbkey и учишь на бумажку костанты

обрати внимание на :
vbKeyMButton - средняя кнопка мыши
vbKeyLButton - плевая
vbKeyRButton - правая

Новые блоги и статьи Все статьи Все блоги /
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .	Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .	wmic не является внутренней или внешней командой Maks 02.04.2026 Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/	Программная установка даты и запрет ее изменения Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: при создании документов установить период списания автоматически. . .

Гость

	Обработка событий мыши и клавиатуры на vb6 11.06.2007, 18:18. Показов 2858. Ответов 2 Метки нет (Все метки) Нужна помощ,подскажите сайт или сбросте материал по теме: обработка событий мыши и клавиатуры на vbasik 6.0

@Pricolist сам себе админ и инженер 1345 / 99 / 11 Регистрация: 07.09.2006 Сообщений: 1,573
	12.06.2007, 15:31
	еще есть инфа по константам для KeyCode заходишь в бейсик жмешь F2 в поиске вводишь vbkey и учишь на бумажку костанты обрати внимание на : vbKeyMButton - средняя кнопка мыши vbKeyLButton - плевая vbKeyRButton - правая 0