Uppercase by position in field

[eighthman11]

Is there a way to uppercase a letter by position. For example I want
to upper case any character that follows a period "." in a field.
Thanks for any help.

 

[Phillip Windell]

What happens when it takes the sentence,
"John S. went down the street",
and turns it into,
"John S. Went down the street"?

Phil

 

[Graham Mandeno]

Use the AfterUpdate event of the textbox control on your form. There you
can perform any kind of "cleanup" operations on the data and change it in
whatever way you like.

For example, the following code will uppercase any character preceded by a
".":

Dim iPos As Integer
iPos = 1
Do
iPos = InStr(iPos, MyTextbox, ".")
If iPos = 0 Or iPos = Len(MyTextbox) Then Exit Do
iPos = iPos + 1
Mid(MyTextbox, iPos, 1) = UCase(Mid(MyTextbox, iPos, 1))
Loop

 

[eighthman11]

Hey Graham thanks for taking the time to help. I'm putting in the code
now to give it a try. You're a life saver.

Use the AfterUpdate event of the textbox control on your form. There you
can perform any kind of "cleanup" operations on the data and change it in
whatever way you like.

For example, the following code will uppercase any character preceded by a
".":

Dim iPos As Integer
iPos = 1
Do
iPos = InStr(iPos, MyTextbox, ".")
If iPos = 0 Or iPos = Len(MyTextbox) Then Exit Do
iPos = iPos + 1
Mid(MyTextbox, iPos, 1) = UCase(Mid(MyTextbox, iPos, 1))
Loop

--
Good Luck!

Graham Mandeno [Access MVP]
Auckland, New Zealand

Is there a way to uppercase a letter by position. For example I want
to upper case any character that follows a period "." in a field.
Thanks for any help.