Remapping the keyboard up/down arrows for tab stops

[Richard Coutts]

I have a Continous Form with 5 or so fields for each record, in a line
from left to right. Because the Contuous Form lists several records
at once, the form looks pretty much like a Datasheet. So, I'd like to
be able to navigate it like one when using the up/down/left/right
arrow keys of the keyboard. I have the fields set with tab stop
settings so that hitting the tab key moves one field to the right.
The problem I'm having is when I hit the down key of the keyboard, I
would like the navigation to jump to the record below the current
record, keeping the same field in focus. Instead, navigation simply
tab stops to the right. Likewise when I try to navigate "up" with the
up arrow key, it navigates to the left.

The left and right keys navigate fine through the tab stops, but
because the up/down keys are doing the same thing as the right/left
keys, they are pretty useless.

Is there a way to modify this behavior?

Thanks,
Rich

[Randy Harris]

"Richard Coutts" <rc*****@comcas t.net> wrote in message
news:70******** *************** ***@posting.goo gle.com...

I have a Continous Form with 5 or so fields for each record, in a line
from left to right. Because the Contuous Form lists several records
at once, the form looks pretty much like a Datasheet. So, I'd like to
be able to navigate it like one when using the up/down/left/right
arrow keys of the keyboard. I have the fields set with tab stop
settings so that hitting the tab key moves one field to the right.
The problem I'm having is when I hit the down key of the keyboard, I
would like the navigation to jump to the record below the current
record, keeping the same field in focus. Instead, navigation simply
tab stops to the right. Likewise when I try to navigate "up" with the
up arrow key, it navigates to the left.

The left and right keys navigate fine through the tab stops, but
because the up/down keys are doing the same thing as the right/left
keys, they are pretty useless.

Is there a way to modify this behavior?

Thanks,
Rich

Ya, I like using the arrow keys too. Lots of ways to do what you want, this
one works for me:

Private Sub Form_KeyDown(Ke yCode As Integer, Shift As Integer)
On Error Resume Next
If KeyCode = 40 Then
DoCmd.GoToRecor d , , acNext
End If
If KeyCode = 38 Then
DoCmd.GoToRecor d , , acPrevious
End If
Exit Sub
End Sub

HTH,
Randy