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

bloquear una serie te teclas en un formulario

Estas en el tema de bloquear una serie te teclas en un formulario en el foro de Visual Basic clásico en Foros del Web. hola compañeros como puedo hacer para restringir el uso de algunas teclas en formulario actual de visual basic 6. gracias compañeros por ejemplo las teclas ...
  #1 (permalink)  
Antiguo 29/08/2008, 14:38
 
Fecha de Ingreso: febrero-2006
Mensajes: 52
Antigüedad: 18 años, 2 meses
Puntos: 0
bloquear una serie te teclas en un formulario

hola compañeros como puedo hacer para restringir el uso de algunas teclas en formulario actual de visual basic 6. gracias compañeros

por ejemplo las teclas F!.F"...las teclas tab etc. gracias
  #2 (permalink)  
Antiguo 31/08/2008, 04:03
Avatar de A.H.H  
Fecha de Ingreso: mayo-2007
Ubicación: IRUN,(GUIPUZCOA) España
Mensajes: 178
Antigüedad: 17 años
Puntos: 4
Respuesta: bloquear una serie te teclas en un formulario

Hola pues creo que lo puedes hacer con el evento keydown del formulario y poniendo la propiedad keypreview a true del mismo formulario.

EL SIGUIENTE EJEMPLO ES PARA SABER EL CODIGO DE LA TECLA PULSADA:
Coloca un label en el formulario y dentro del formulario copia y pega el siguiente codigo para que veas el ejemplo:


Cita:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)

Label1.AutoSize = True

Label1.Caption = "Codigo Tecla: " & KeyCode

End Sub
EL SIGUIENTE EJEMPLO ES PARA DETECTAR LA TECLA ESCAPE (CODIGO 27):
Coloca tambien un label dentro del formulario y el siguiente codigo:

Cita:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Label1.AutoSize = True
If KeyCode = 27 Then
Label1.Caption = "Has pulsado tecla escape"
Else
Exit Sub
End If
End Sub
bueno sabiendo los codigos de las teclas con el primer ejemplo puedes detectar las teclas pulsadas con el segundo ejemplo.
si cambias el codigo en el segundo ejemplo y pones que si el keycode es igual a 27 salga del sub , no hara nada al pulsar el escape.
If KeyCode = 27 Then
exit sub


Espero darte una idea.Salu2
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 04:46.