EL BOTON ESC EN VISUAL

joa
06 de Marzo del 2006
HOLA Q TAL ES PERO Q ME PUEDA AYUDAR, TENGO, MI FORMULARIO Y NECESITO Q CUANDO PRESIONE ESC SE CIERRE LA VENTANA SE Q EL KEYCODE DEL ESC ES 27, LO Q HAGO ES LO SGTE:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If Shift = 16 Then
If KeyCode = 27 Then
UNLOAD ME
End If
End If
End Sub

ESTO ES MI IDEA PERO NO FUNCIONA, NOSE SI HAY OTRA FORMA

mvallejos
06 de Marzo del 2006
Primero, para que funciones el evento KeyPress de un form, la propiedad KeyPreview debe ser True.
Después colocas el condicional

If Keyascii = 27 then
Unload Me
end if

En un form, una vez que colocas un control, este Form ya no rebibe las pulsaciones de teclas, salvo claro, que el KeyPreview sea True

Saludos

axelopez
06 de Marzo del 2006
debes poner la propiedad del formulario

keypreview = true

para que el formulario optenga los eventos del teclado sin importar en que controle estes situado