Thread: como activar teclas en el vb

hello community would like to help me complete my
project and look for google but did not find any answer
so I come to you the ojalas take help me this is
my project


Private Sub Command1_Click ()
Dim X As Long
Dim X As Long
Call Readalong ("usca" & H7001ABC, X)
X1 = X + & H117008
Call WriteALong ("usca" X1, 100000)
End Sub

Private Sub Command2_Click ()
Dim X As Long
Dim X As Long
Call Readalong ("usca" & H7001ABC, X)
X1 = X + & H117008
Call WriteALong ("usca" X1, 100)
End Sub

Como seria that command is activara con cada una tecla digamos A, 1 +
o con una combinacion of teclas digamos ALT +5, CtROL + F3

PD creo 1 timer that seria o 2 seria pero como por aver the funcion Favot me das una mano