Command Buttons to bring user back to top of current form

[panteraboy]

Hi byters . Some of the forms Im creating contain full computer specifications and as a result are very long. Im trying to put a a command button at the bottom of these forms that returns the user to the top of the current form when clicked. Is this possible? I cant find any macros that facilitates this . Any pointers would be greatly appreciated.

[MindBender77]

Hi byters . Some of the forms Im creating contain full computer specifications and as a result are very long. Im trying to put a a command button at the bottom of these forms that returns the user to the top of the current form when clicked. Is this possible? I cant find any macros that facilitates this . Any pointers would be greatly appreciated.

Just a thought, panteraboy. You might want to trying putting a colorbox at the top of your form, making its backcolor and border transparent. In the OnClick event of you command button, you could set the focus to that colorbox. This is untested but, it might be worth a try.

Bender

[missinglinq]

Bender has the right idea, but why add a control just for this purpose? Just set focus to the first control at the top of your form:

Private Sub GoToTop_Click()
Me.FirsrtField.SetFocus
End Sub

Linq ;0)>

[ADezii]

Hi byters . Some of the forms Im creating contain full computer specifications and as a result are very long. Im trying to put a a command button at the bottom of these forms that returns the user to the top of the current form when clicked. Is this possible? I cant find any macros that facilitates this . Any pointers would be greatly appreciated.

There is a very simple Method designed specifically for what you are describing, namely, the GoToPage Method. This Method moves the Focus to the 1st Control on a specified Page in the Active Form. In your case, place the following line of code in the Click() Event of your Command Button:

Me.GoToPage 1

[panteraboy]

Thanks alot guys yes are a great help and good teachers. Thanks again

[missinglinq]

That's why we're here!

Linq ;0)>