Need to detect right arrow key

[ChuckColeman1812]

I have a text box on a form that has an input mask. The input mask is:
09\-09" X "0\-09" X "0\-09;0;_ I have some vba code using the On Exit event
from the text box where I need to detect if the user used the right arrow key
AFTER entering the first digit, (in the second position where the 9 allows
it), to move them to next digit input position. I can't figure out how to


detect that the right arrow key was used. If the user uses the space bar AFTER
entering the first digit, no problem; I just look for " ". I've tried
Mid(TextBoxName, 2, 1) = vbKeyRight but it doesn't work.



Any ideas?



Chuck

[June7]

The only events I can think of to use would be KeyDown, KeyUp, KeyPress. The event will trigger for each key stroke in that control.

[ChuckColeman1812]

The only events I can think of to use would be KeyDown, KeyUp, KeyPress. The event will trigger for each key stroke in that control.

Thanks, that's helpful. But, I still can't get the system to recognize a right-arrow. Here's what I'm using:

Private Sub Table_Length_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyAscii = 39 Then
MsgBox ("Hey, I found a right arrow.")
KeyAscii = 57
End If
End Sub

If I substitute a 32, (space) for the 39, and I use the space bar instead of the right-arrow key, it works.

Scratching my head!!!!

Chuck

[June7]

I use KeyPress event to detect CR:
Private Sub tbxDate_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then

Chr(39) returns apostrophe character. Not sure what codes for cursor keys are. This seems to indicate 28 is cursor right: http://www.williamrobertson.net/documents/ascii.html

Also review:
http://msdn.microsoft.com/en-us/libr...ffice.11).aspx
http://www.alanwood.net/demos/ansi.html
http://text-symbols.com/ascii/

[ChuckColeman1812]

I got it to work. Here's what I used:

Dim KeyCode As Integer
If KeyCode = 39 Then
KeyCode = 32
End If

In my previous post, I declared KeyCode but didn't use it in the If/Then statement. It must have been late in the day.
This is triggered on the Key Down event for the text box so it works for every character/right-arrow.

Thanks for your feedback.

Chuck