Access - contar teclas pulsadas

 
Vista:

contar teclas pulsadas

Publicado por luis (29 intervenciones) el 11/07/2008 18:38:35
Hola qué tal.

Necesito hacer una aplicación que me cuente las teclas que se pulsan en el teclado. Cada tecla representa una cosa, de manera que al llegar a 100 cosas se pare y me haga las medias, sumatorios y demás.

El caso es que no se si se puede hacer en access, y no encuentro nada parecido por ahí. Hace un tiempo pose un post aqui pero no obtuve respuesta, a ver si ahora hay suerte. De todas formas, si alguien fuera tan amable de echarme un cable le estaría agradecido.
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:contar teclas pulsadas

Publicado por Enrique (1299 intervenciones) el 11/07/2008 20:42:56
Hola Luis:
Siempre que se trate de teclas de caracteres imprimibles, incluido el Espacio, puede hacerse simplemente limitando el Control a 100 caracteres y que al llegar a ese límite no permita escribir más y haga los cálculos. Ahora bien, si las teclas incluyen tambien "F1, F2, F3......", "ESC", "ALT", "CONTROL", "SHIFT", "SUPR", etc, etc., entonces no se me ocurre como hacerlo ahora mismo.

Saludos
Enrique
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:contar teclas pulsadas

Publicado por Victoria (1530 intervenciones) el 13/07/2008 12:12:16
Hola:

En el evento LOAD del form tienes que poner:
Me.KeyPreview=true
De esta forma haces que:

"Puede utilizar la propiedad TeclaDePresentaciónPreliminar (KeyPreview) para especificar si los procedimientos de evento del teclado a nivel del formulario se llaman antes de los procedimientos de evento del teclado de un control."

Tambien has de definir una variable para contar las veces que se presiona una tecla, por ejemplo:

Dim veces as Integer

Ahora tienes dos eventos en el form para detectar la pulsación de las teclas:

Al bajar una tecla: detectas el KeyCode de la tecla, que incluye las teclas de función

y... Al presionar una tecla que detecta el KeyAscii

Tan solo has de hacer un select case, o lo que te comvenga, para detectar que tecla pulsas, en tu caso, habrías de poner todos los valores posibles de KeyCode (mira los cóigos ASCII de las teclas en la Ayuda) y cuando el sistema detecte este valor ASCII:

veces=veces+1

Cuando el valor llegue a 100 que haga lo que necesites y reinicializas la variable
veces=0
No olvides inicializar la varible a 0 al abrir el form

Un saludo
Victori
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:contar teclas pulsadas

Publicado por Luis (29 intervenciones) el 14/07/2008 16:46:36
Ok, gracias. Muy buena la idea!

Con esta información me pondré a intentarlo a ver cómo sale.
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