Visual Basic - atajos del teclado

Life is soft - evento anual de software empresarial
 
Vista:

atajos del teclado

Publicado por Templer (18 intervenciones) el 05/08/2004 22:10:15
necesito que un programa tenga atajos directos en el teclado numerico, que al presionar una sola tecla del teclado numerico(osea sin alts ni control ni nada de eso) ya sea un numero o suma o lo que sea, se presione un cmd determinado en mi programa,alguien podria decirme detalladamente como se puede hacer esto por favor?, muchas gracias por la atencion.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:atajos del teclado

Publicado por juan carlos zuñiga (94 intervenciones) el 05/08/2004 22:15:34
Hola, esto lo puedes hacer mediante el evento KEYUP de la forma donde tienes tus cmd, atrapa el codigo de la tecla que deseas y lo asocias al evento CLICK del command que quieres...salu2..
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:atajos del teclado

Publicado por Templer (18 intervenciones) el 05/08/2004 22:19:17
la verdad no me quedo muy clado, podrias explicar nuevamente mas detalladamente y con ejemplos por favor, disculpa tanta molestia, y si es posible crees que me puedas decir como saber cuantas lineas de codigo tengo en mi programa, muchas gracias.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:atajos del teclado

Publicado por Semper (74 intervenciones) el 05/08/2004 22:55:24
Aqui un ejemplo...

Private Sub Form_Load()
\'...
Me.KeyPreview = False
\'...
End Sub

Private Sub Form_KeyUp(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyNumpad1 Then
Command1_Click
ElseIf KeyCode = vbKeyNumpad2 Then
Command2_Click
End If

End Sub

Private Sub Command1_Click()
MsgBox \"Command1 Activado !\"
End Sub

Private Sub Command2_Click()
MsgBox \"Command2 Activado !\"
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:atajos del teclado

Publicado por Semper (74 intervenciones) el 05/08/2004 22:57:42
Disculpa... Esto es lo correcto en el Form_Load:

Private Sub Form_Load()
'...
Me.KeyPreview = True
'...
End Sub
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:atajos del teclado

Publicado por tecniCam (186 intervenciones) el 05/08/2004 23:52:34
Debes tener en cuenta que has de utilizar el código ASCII del teclado.
El teclado numérico varía del otro.
El código ASCII de los número del teclado numérico es el mismo del otro teclado más 48.
El resto de "casi" (digo casi por que hay algunas que aumentan en 1, como el *) todas las demás teclas (-. .. +) son como las del otro teclado menos 80.

Ejemplo:
Código del número 2 del teclado normal = 50, del numérico 98 (48 más)
Código del signo + del teclado normal = 187, del numérico 107 (80 menos)

Sabiendo esto ya puedes usar KeyPress.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar