Change case type of each 1st character of a word to Uppercase

[dstrange]

I want to be able to convert a string so that every first character of a word gets converted to uppercase and the remaining characters are lower case.

Below are examples of existing data on the left and how I would like them to be formatted when displayed.
ie.
this is a test = This Is A Test
THIS IS a TEst = This Is A Test
THISISATEST = Thisisatest

 

[HarleyQuinn]

How about the StrConv function?

YourFormattedText = StrConv(YourText, vbProperCase)

Hope this helps

HarleyQuinn
---------------------------------
Get the most out of Tek-Tips, read FAQ222-2244 before posting.

 

[dstrange]

Nevermind I found this thread.

http://www.tek-tips.com/viewthread.cfm?qid=741430

 

[HughLerwill]

Try;

Private Sub Command1_Click()

MsgBox StrConv("hello there", vbProperCase)

End Sub

 

[BobRodes]

That's what the link that dstrange provided suggests, Hugh...

 

[HughLerwill]

Bob,

Thank you for responding.

No that was the solution that HarleyQuinn provided.

If you checked the timing of my message and the others you will see that I was (probably) writing it as HarleyQuinn and dstrange posted.

Happy New Year, Hugh

 

[PeterWallace]

N.B ....

for something like "hello there"
StrConv("hello there", vbProperCase) is fine


BUT if it is Peoples names .....

Well watch things like O'Brian , MacFee

 

[Error7]

...and also watch things like U.S.A and U.K.

I use the keypress event in the text box to check if the leading character is chr(32) or chr(46). This doesn't get round the MacFee problem but can accomodate O'Brian.

[gray]Experience is something you don't get until just after you need it.[/gray]

 

[BobRodes]

So you were, Hugh. Sorry for the crabby sounding post.

Bob