Uppercase and Next/Prvs Cmd buttons


I was just wondering about a couple of things.

Firstly I would like to force a text box to uppercase, or at least store the data entered in uppercase. I'm sure this is very simple but I can't for the life of me figure it out!

Secondly I would like a command button to continuously scroll through records (like the navigation buttons). I do not want the navigation buttons to be shown on my form therefore scrolling through records is currently very slow (click click click etc)!!!

Thanks all.
GustusAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

shanesuebsahakarnCommented:
For your first problem, set the InputMask of the text box to:
>

For your second problem, the only way I can think to do this is to combine the MouseDown, MouseUp and Timer events. In the MouseDown event of the command button, set a global form variable to true. In the Timer event, which you can set to fire at an interval to suit yourself, check if that variable is true. If it is, then go to the next record. In the MouseUp event, set the variable to false.
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
Arthur_WoodCommented:
two possibilities for #1)

Use the Lost Focus Event or the KeyPress Event:

Private Sub txtTextBox_LoastFocus()
   txtTextBox.Text = UCase$(txtTextBox.Text)
End Sub


or

Private sub TxtTextBox_KeyPress(KeyAscii as Integer)
   If keyAscii >= Asc("a") and KeyAscii <= asc("z") then
       KyeAscii = KeyAscii -32
   End If
End Sub

The first will allow lowercase entry, and then convert the ENTIRE text to Upppercase, when the user tabs off the text box.

The second will convert the lower case to uppercase 'on the fly', so the user will not be aware that anything has taken place.

AW
0
GustusAuthor Commented:

Thanks both but I am still struggling with the scrolling record button. Any ideas anyone?
0
1WilliamCommented:
No comment has been added lately, so it's time to clean up this TA.
I will leave a recommendation in the Cleanup topic area that this question is:
Accept question, points to shanesuebsahakarn
Please leave any comments here within the next seven days.
 
PLEASE DO NOT ACCEPT THIS COMMENT AS AN ANSWER!
 
1William
EE Cleanup Volunteer
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Microsoft Access

From novice to tech pro — start learning today.

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.