Require data in all caps

J

joedewing

I have multiple fieds on a form and want all information to default to
capital letters, no matter how it is typed in. I know I can make the font
Italic, bold, ect. but is there a place to make it all caps?
Thanks
 
K

kabaka

In the AfterUpdate() event of your text box use the UCase function. For
example:

Private Sub Text1_AfterUpdate()
dim str as string
str = me.text1.value
me.text1.value = UCase(str)
end sub
 
M

Mark M

Do you need to store the text in the table as all uppercase? If not, you
can just format the text in your forms and reports to display it in
uppercase. If you want to store it in uppercase, search the forum for a
lengthy thread on this very subject.
 
Top