• Jueves 2 de Mayo de 2024, 01:43

Autor Tema:  Codigo Ascci Del Teclado  (Leído 1320 veces)

az8

  • Miembro MUY activo
  • ***
  • Mensajes: 111
    • Ver Perfil
Codigo Ascci Del Teclado
« en: Jueves 19 de Mayo de 2005, 20:46 »
0
HOLA OTRA VEZ NECESITO HACER UN PROGRAMA KE ME MANDE EL CODIGO ASCCI AL PRESIONAR CUALKIER TECLA DEL TECLADO (PARA HACER USO DE ESTE CODIGO EN OTRA APLICACION) NO SE SI ME EXPLIKE BIEN.......

POR SU AYUDA GRACIAS...

ATE

AZ8

cpmario

  • Miembro HIPER activo
  • ****
  • Mensajes: 629
    • Ver Perfil
    • http://www.cpimario.com
Re: Codigo Ascci Del Teclado
« Respuesta #1 en: Viernes 20 de Mayo de 2005, 05:31 »
0
Puedes obtener el código ASCII de las teclas en el evento KeyPress

Código: Text
  1. Private Sub txtEdit_KeyPress(KeyAscii As Integer)
  2.     Debug.Print KeyAscii
  3. End Sub
  4.  

Pero si lo que deseas es obtener información de todas las teclas entonces debes ver el evento KeyDown de un textBox como el ejemplo siguiente:

Código: Text
  1. Private Sub TxtEdit_KeyDown(KeyCode As Integer, Shift As Integer)
  2.     Debug.Print KeyCode, Shift
  3. End Sub
  4.  

En KeyCode está el código ASCII y en Shift si hay otra tecla presionada por ejemplo:

Código: Text
  1. If KeyCode = 86 And Shift = 2 Then     'Ctrl V
  2.  
  3. ElseIf KeyCode = 90 And Shift = 2 Then  'Ctrl Z
  4.  

También en Shift proporciona otros números de teclas como las de función F1, bloqueo de mayúsculas, Alt, etc.

Existe un pero, ya que en KeyCode es lo mismo que elijas una mayúscula que minúscula.
 

 :)