Ver Mensaje Individual
  #3 (permalink)  
Antiguo 07/01/2006, 14:07
antonio2005pe
 
Fecha de Ingreso: agosto-2005
Ubicación: Peru-Lima
Mensajes: 225
Antigüedad: 19 años, 7 meses
Puntos: 0
Cita:
Iniciado por (Pato)²
hola, estoy haciendo un programa bastante simple, y en un timer tengo un par de "If getasynckeystate (vbkeyBLABLABLA) then..." y quiero que cunado se toque alguna de esas teclas suene un beep estilo el del ENTER en un TextBox... alguien sabe como hacerlo? algun llamado a api que poner en en IF?

Muchas Gracias!
no entendi k es lo k kieres pero me parece k kieres algo como esto:
Código:
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer

Private Sub Timer1_Timer()
x = GetAsyncKeyState(13)
If x = -32767 Then
Label1.Caption = "Usted Presionó [Enter]"
Beep
End If
End Sub
Suerte :)