[RESOLVED] Detecting Shift and Control Keypress in VS2005 and CF20

[easymoney]

I am coding an app using Jett Xl handheld PC running Windows CE .NET 5.0. It has a full keypad that I am attempting to detect key combinations such as Control C (^C), etc.

The following code will detect a KeyPress such as the letter "O":

Private Sub frmMain_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles MyBase.KeyPress
Dim chrKeyPress As Char

chrKeyPress = e.KeyChar.ToString.ToUpper

If chrKeyPress = "O" Then
frmOptions.Show()
e.Handled = True
End If

I tried something like:

If e.shift Then Then
MsgBox("Shift")
End If

No luck, that must be older .Net, does not seem to be supported. Is there another method that is supported in VS 2005 and CF20?

[petevick]

Hi,
try using the keydown event rather than the keypress event - then you can do e.control

Pete

[easymoney]

That is the event that does the trick.... thanks.

Private Sub frmAccount_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown

If e.Control.ToString And e.KeyCode = Keys.H Then
TabControl1.SelectedIndex = 1
e.Handled = True
End If

If e.Control.ToString And e.KeyCode = Keys.E Then
TabControl1.SelectedIndex = 0
e.Handled = True
End If

End Sub

On my form I have a textbox that hold some data that selected text. When I am on SelectedIndex = 0 and I press ^E, the selected text remains selected and unchanged. When I then press ^H, the SelectedIndex is changed to 1, but the textbox value is deleted.

For example, if Textbox1 has the number 123456 and it is all highlight, and I press ^H, the data is deleted from Textbox1 and then the Tab is changed to Tab1 is selected.

Why is the keypress deleting my text? If the focus is set to Textbox1 and nothing is highlighted, it just deletes on digit from the Textbox1 when press ^H.

Any clue to how I can surpess the keypress that is changing the value of Textbox1?

Confused :blush:

[easymoney]

It has nothing to do with the tab control, I used this mod to test the keydown event handling:

If e.Control.ToString And e.KeyCode = Keys.H Then
TabControl1.SelectedIndex = 0
e.Handled = True
End If

If e.Control.ToString And e.KeyCode = Keys.E Then
TabControl1.SelectedIndex = 0
e.Handled = True
End If

When Textbox1 has focus, ^E is handled and text is unchanged. When I press ^H, it seem to get handled, but it seems to do a backspace as well deleted any highlighted text, or erases one char in front of cursor, ie a backspace.

How can I stop ^H from affecting text in Textbox1?

[easymoney]

Ok, ^H seems to do backspace in any textbox.

How come e.handled does not strip the backspace function from ^H? Is that not what it should do?

[easymoney]

Ok, this seems to work. I made a Public varible, the set it in the KeyDown event and then used e.Handled in the KeyPress event.

This method, it seems that e.handled performs as expected.

Private Sub frmAccount_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles MyBase.KeyDown

bControl = False

If e.Control.ToString And e.KeyCode = Keys.H Then
TabControl1.SelectedIndex = 1
bControl = True
End If

If e.Control.ToString And e.KeyCode = Keys.E Then
TabControl1.SelectedIndex = 0
bControl = True
End If

End Sub

Private Sub frmAccount_KeyPress(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyPressEventArgs) Handles MyBase.KeyPress

If bControl = True Then
e.Handled = True
End If

End Sub

Is this a correct implementation...?

[petevick]

Hi,
looks good to me

Thanks

Pete

[easymoney]

Thanks. I will mark resolved.