Programación General > Visual Basic 6.0 e inferiores

 Re: tratamiento de l atecla suprimir

(1/1)

MindEye:
- Sabe alguien como puedo tratar la tecla suprimir, par que al ser pulsada, no borre, haga otra cosa, como lansar un mensaje de texto indicando que esa tecla no es valida.

 - Yo lo he intentado asi

 if KeyAscii = vbKeyDelete then
    keyascii = vbkeyright
    msgbox = "Esta tecla no furula"
 end if

 - Pero no me funciona

 - Gracias amigos

Jaume:
Solo debes indicar al formulario donde esté el TextBox en el que vas a escribir, la propiedad KeyPreview a true, de manera que capture la pulsación de una tecla antes que el TextBox.

Entonces, en el evento KeyDown del formulario pones un código similar a este

If KeyCode = vbKeyDelete Then
    MsgBox ("Ni hablar de eso")
    KeyCode = 0
End If

de manera que si pulsamos la tecla suprimir nos aparecerá el mensage y anulará la tecla al forzarlo con la instrucción KeyCode=0

Salu2

Maxier:
Ni bien llegue  a casa pruebo ambos casos, recien probe el ultimo con access ya que no tengo instalado el vb, y me andubo bien, lo unico que no bloquea es la tecla windows,pero eso ya lo hago con una api.

Sdls

Navegación

[0] Índice de Mensajes