Anyone know how the DEL could be captured?

[Abdulrahman]

in a textbox.. is it not possible to capture the DEL button when pressed? and do something with it.... as i couldint get it to work. It works fine for the Backspace though.

Private Sub Text1_KeyPress(KeyAscii As Integer)

if KeyAScii = 8 then 'this is for backspace..which works)
do something
end if

----
however.. the following does not work.. which is for DEL

if keyAscii = 127 then
do something
end if


any ideas?
cheers
Abe

[Nightwalker83]

Originally posted by Abdulrahman
in a textbox.. is it not possible to capture the DEL button when pressed? and do something with it.... as i couldint get it to work. It works fine for the Backspace though.

Private Sub Text1_KeyPress(KeyAscii As Integer)

if KeyAScii = 8 then 'this is for backspace..which works)
do something
end if

----
however.. the following does not work.. which is for DEL

if keyAscii = 127 then
do something
end if


any ideas?
cheers
Abe

Use this:

[Abdulrahman]

thanx but this does not show a value for the DEL button..

i looked at some ASCII code charts... and it gave the ASCII value for DEL (Delete button) as 127.

However I am finding no way of capturing the button to set off a few events when user does press the DEL button.

any ideas anyone?

Abe

[trisuglow]

Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)
 
    If KeyCode = vbKeyBack Then
        MsgBox "Rubout key pressed."
    ElseIf KeyCode = vbKeyDelete Then
        MsgBox "Delete key pressed."
    End If
 
End Sub

[Nightwalker83]

Originally posted by Abdulrahman
thanx but this does not show a value for the DEL button..

i looked at some ASCII code charts... and it gave the ASCII value for DEL (Delete button) as 127.

However I am finding no way of capturing the button to set off a few events when user does press the DEL button.

any ideas anyone?

Abe

Download the file again because I've changed it.

[Abdulrahman]

thanx..

i was trying to get it to work on the Keypress event...along with the other ones..

but i'v just found a workaround.. will just use sendkeys function

thanks!
Abe

[Si_the_geek]

i have a value of 46 for Del on my VB ascii chart...

[Nightwalker83]

Originally posted by Si_the_geek
i have a value of 46 for Del on my VB ascii chart...

It Keycode not Ascii but your right about the 46.

[Abdulrahman]

yes but could you guys actaully do something with it??

like if keyAscii = 46 then.......


coz i couldint get that to work..

Abe

[Nightwalker83]

Originally posted by Abdulrahman
yes but could you guys actaully do something with it??

like if keyAscii = 46 then.......


coz i couldint get that to work..

Abe

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 46 Then
MsgBox ("Yes this works.")
End If
End Sub

[Abdulrahman]

ah right keycode.. what I mean is that you cant use the KeyAscci codes.. for the DEL button.. keycode=46 works.. but KeyAscci = 127 does not.. anyhow... thanks a lot

Abe