Moving through records via Page Down

[Robert M]

I have a subform that diplays 6 records in the open window. I have place record movement buttons to help the oporator move through the form (I.E. First record, Previous Record, Next Record, Last Record) This works to a point. I need to be able to have the Previous Record and Next record move the cursor to the First Record of the next page. or the first record of the Previous Page. I have tried the
"DoCmd.GoToRecord,,acNext, 6"
and
"DoCmd.GoToRecord,,acPrevious,6"
This does well but skips displaying some records.


I have found manually using the Page Up and Page Down works excellently so how do I program the Prev Rec Next Rec buttons to do this.

Thank you for your help.

Robert M

[tlittell]

Try this. It will cycle through records on a bound form using pageup/pagedown button on your keyboard. Not sure this is exactly what you are trying to accomplish, but should get you started.

 
Private Sub form1__keydown(keycode As Integer, shift As Integer)
If keycode = vbpagedown Then DoCmd.GoToRecord , , acNext
If keycode = vbpagedown Then DoCmd.GoToRecord , , acPrev
End Sub

[Robert M]

Thank you tlittel. I'm sorry that I might not have been clear in my text. What I am wanting is not so much to use the keypad (except as a last resort) but a button code that will allow me to skip to the next set of records. However, I do thank you for the information you have given me. Any information I get helps for future programming.

Robert M

[tlittell]

Try this. Be sure to setfocus on the subform you want to page through. Assign SendKeys "{PGUP}" to another button.

 
Private Sub Command4_Click()
Child1.SetFocus 'important
SendKeys "{PGDN}"
End Sub

Let me know if that works for you.

[Robert M]

Thanks again for clearing it up. I will need to research on setfocus as well as Child1 But I do understand better what you mean.

Thanks again

Robert M