Insert key press in text box

[jimmy]

Hi all

I am making a program whereby when the insert key is pressed in a text
box it opens up another form with the search parameters they entered in
the text box and automatically searches for the data. I have the code
below however it does not work when i press the insert key. I have
tried it with the enter key Ascii code 13 and all works fine! Is it
something to do with Insert being a system/bios key? My code is below;

Private Sub TelephoneTxt_KeyPress(ByVal sender As Object, ByVal e
As System.Windows.Forms.KeyPressEventArgs) Handles
TelephoneTxt.KeyPress
'handle telphone number search
Dim key As Char = Microsoft.VisualBasic.ChrW(45)
If e.KeyChar = key And TelephoneTxt.Text = "" And
SurnameTxt.Text = "" Then
MsgBox("Please enter at least one of the two search
parameters")
ElseIf e.KeyChar = key Then
CustomerSearch.ShowDialog()
CustomerSearch.CustomerReservationSearch(SurnameTx t.Text,
TelephoneTxt.Text)
End If
End Sub
Any help is much appreciated

Thanks

James

[The Grim Reaper]

"jimmy" <ja**************@tiscali.co.ukwrote in message
news:11*********************@16g2000cwy.googlegrou ps.com...

Hi all

I am making a program whereby when the insert key is pressed in a text
box it opens up another form with the search parameters they entered in
the text box and automatically searches for the data. I have the code
below however it does not work when i press the insert key. I have
tried it with the enter key Ascii code 13 and all works fine! Is it
something to do with Insert being a system/bios key? My code is below;

Private Sub TelephoneTxt_KeyPress(ByVal sender As Object, ByVal e
As System.Windows.Forms.KeyPressEventArgs) Handles
TelephoneTxt.KeyPress
'handle telphone number search
Dim key As Char = Microsoft.VisualBasic.ChrW(45)
If e.KeyChar = key And TelephoneTxt.Text = "" And
SurnameTxt.Text = "" Then
MsgBox("Please enter at least one of the two search
parameters")
ElseIf e.KeyChar = key Then
CustomerSearch.ShowDialog()
CustomerSearch.CustomerReservationSearch(SurnameTx t.Text,
TelephoneTxt.Text)
End If
End Sub
Any help is much appreciated

Thanks

James

James,

The KeyPress event doesn't fire for the insert key, as it doesn't produce a
character (e.KeyChar).
You can use the KeyDown or KeyUp event to trap the Insert key;

Private Sub TelephoneTxt_KeyDown(ByVal sender As Object, ByVal e As System.
_
Windows.Forms.KeyEventArgs) Handles TelephoneTxt.KeyDown
' Handle telphone number search
If e.KeyCode = Keys.Insert And TelephoneTxt.Text = "" And
SurnameTxt.Text = "" Then
MsgBox("Please enter at least one of the two search parameters")
ElseIf e.KeyCode = Keys.Insert Then
CustomerSearch.ShowDialog()
CustomerSearch.CustomerReservationSearch(SurnameTx t.Text,
TelephoneTxt.Text)
End If
End Sub

Hope that helps.
_____________________________
The Grim Reaper

[Rad [Visual C# MVP]]

On 5 Dec 2006 12:12:27 -0800, jimmy wrote:

Private Sub TelephoneTxt_KeyPress(ByVal sender As Object, ByVal e
As System.Windows.Forms.KeyPressEventArgs) Handles
TelephoneTxt.KeyPress
'handle telphone number search
Dim key As Char = Microsoft.VisualBasic.ChrW(45)
If e.KeyChar = key And TelephoneTxt.Text = "" And
SurnameTxt.Text = "" Then
MsgBox("Please enter at least one of the two search
parameters")
ElseIf e.KeyChar = key Then
CustomerSearch.ShowDialog()
CustomerSearch.CustomerReservationSearch(SurnameTx t.Text,
TelephoneTxt.Text)
End If
End Sub

Any help is much appreciated

Thanks

James

Hey james,

Try the KeyDown event instead

--
Bits.Bytes
http://bytes.thinkersroom.com

[jimmy]

Thanks to both you guys!