Im want to del a file using the DEL key.
this is the code that won't work
Private Sub File1_Click()
SelectedFile = File1.Path & "\" & File1.FileName
Image1.Picture = LoadPicture(SelectedFile)
If KeyCode = vbKeyDelete Then GoTo Kill
MsgBox "Are you sure?"
Kill File1.Path & "\" & File1.FileName
What is wrong ?!?