Capture 'Esc' or X (close)

[Nunina]

Hi Guys!

I need to capture when a user presses the ESC key to close a form or when they use their mouse by pressing the X button. Automatically it goes into the Unload event without capturing which was pressed (Esc or mouse).

Can any of you help??

Thanks a lot!!

Nunina

 

[zarkon4]

Look at the KeyPress event

Private Sub Form_KeyPress(KeyAscii As Integer)
'Capture the esc key here

End Sub


Look at the Query_Unload for your form as well


Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

'Trap the start of exit here (when user clicks 'x'

End Sub

 

[johnwm]

Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)

if UnloadMode = 0 then
'they clicked the cross
if UnloadMode = 1 Then
'they pressed Esc

________________________________________________________________
If you want to get the best response to a question, please check out FAQ222-2244 first

'If we're supposed to work in Hex, why have we only got A fingers?'

 

[Nunina]

Thanks a lot, guys!!!!!

Have a great weekend!!!


Nunina