Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

¡¡Urgente!! Cómo detecto en VB, la combinación de las teclas Control+F9

Estas en el tema de ¡¡Urgente!! Cómo detecto en VB, la combinación de las teclas Control+F9 en el foro de Visual Basic clásico en Foros del Web. Hola, No se cómo se maneja la captura de los códigos de dos teclas que se presionen simultáneamente, por ejemplo, pudiera ser las teclas Control+F9. ...
  #1 (permalink)  
Antiguo 24/01/2005, 15:38
jcl
 
Fecha de Ingreso: enero-2002
Mensajes: 673
Antigüedad: 22 años, 4 meses
Puntos: 1
Información ¡¡Urgente!! Cómo detecto en VB, la combinación de las teclas Control+F9

Hola,

No se cómo se maneja la captura de los códigos de dos teclas que se presionen simultáneamente, por ejemplo, pudiera ser las teclas Control+F9.

Se que el "KeyCode" de la tecla "Enter" es 13, pero desearía saber cómo se maneja la captura del código para más de una tecla.

Saludos.

  #2 (permalink)  
Antiguo 25/01/2005, 04:42
Avatar de lucasiramos  
Fecha de Ingreso: agosto-2004
Ubicación: Santa Rosa, La Pampa, Argentina
Mensajes: 1.484
Antigüedad: 19 años, 8 meses
Puntos: 13
Evento KeyDown

Bueno, para las capturas de teclas simples se suele utilizar el evento KeyPress. Ahora si entra en juego teclas especiales como Control, Shift y otros hay que usar el evento KeyDown. Tiene 2 parametros KeyCode, que es el código de la tecla que queremos capturar (en este caso F9) y Shift, un entero que nos indica si al momento de apretar la tecla (F9 en este caso...) tenemos apretado Control, Shift o Alt. Si tenemos apretado Control, Shift vale 2, si apretamos Shift, vale 1 y si presionamos Alt, vale 4. Entonces hay que jugar con las combinaciones. El código de F9 es 120

Código:
 Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 120 And Shift = 2 Then
	MsgBox "Apreto control F9"
End If
End Sub
Si queres saber qué codigo tiene cada tecla proba lo siguiente
Código:
 Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
	MsgBox KeyCode
End Sub
Bueno. Espero que te sea de utilidad.

Saludos. Lucas
  #3 (permalink)  
Antiguo 25/01/2005, 05:41
jcl
 
Fecha de Ingreso: enero-2002
Mensajes: 673
Antigüedad: 22 años, 4 meses
Puntos: 1
¡Perfecto! ... creo que mejor no pudo ser.

Gracias por tu colaboración.

Saludos.
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 16:09.