Is there a way?

[Detroit man]

Hi all,

Just want to know if there is a function where you call with a string and it gives you back a string whith the first letter in upper case and all the others in lower case

EX:Sending:aSdEEr

Returning:Asdeer

Thanks guys

[DSJ]

Sure... here it is:

Private Function CapFirst(ByVal s As String) As String
Dim First As String
Dim Rest As String
First = s.Substring(0, 1)
Rest = s.Substring(1)
Return First.ToUpper & Rest.ToLower
End Function

[Detroit man]

Thanks i owe you one