VB5/VB6 Простой ремап хоткеев

[AucT]

Как сделать простенький ремап хоткеев, например при нажатие кнопки "Z" отсилалась "Q"

вроде простенькая фишка но чуток не догоняю, а в нете искать походу не умею (часик-два искал ниче толком не нашел)

[mc-black]

А что Вы вообще сделали для "простенького ремапа хоткеев"? Я вот например немного нагуглил, слегка переименовав вопрос в "смена раскладки клавиатуры vb", прочитав про некоторые функции в MSDN (ActivateKeyboardLayout, LoadKeyboardLayout), хоть в данной постановке и непонятно до конца что надо получить. Если это такой простенький ремап, то что тогда даже строки кода не приведете?

[AucT]

у меня пока что есть только такой вариант

Код: Выделить всё

Public Declare Function GetAsyncKeyState Lib "user32" (ByVal vkey As Long) As Integer


Public Sub Key()
If GetAsyncKeyState(vbKeyF8) Then
MsgBox ("WORK")
End If
End Sub

но я би хотел сделать не через таймер, а по собитию:
User нажал клавижу KEY
do smth