Ver Mensaje Individual
  #1 (permalink)  
Antiguo 31/10/2008, 05:53
Avatar de ..::MaRcOs::..
..::MaRcOs::..
 
Fecha de Ingreso: diciembre-2006
Mensajes: 328
Antigüedad: 17 años, 5 meses
Puntos: 3
Acción al presionar la tecla b

Hola tengo un problemita
resulta que necesito que al precionar la tecla b
en un formulario se ejecute una accion.

y tengo el siguiente codigo pero pasa que lo toma para todo
por ejemplo estoy en el messenger y oprimo b
y se ejecuta entonces necesito q solo sea en la aplicacion
y de una vez ver si se puede sacar del timer.


Private Declare Function GetKeyState Lib "user32" (ByVal nVirtKey As Long) As Integer

Private Sub Timer11_Timer()
If GetKeyState(vbKeyB) < 0 Then
Form5.Show
End If
End Sub