• Home
 · 
• String Manipulation
 · 
• This code turns any variable into Sentence Case

This code turns any variable into Sentence Case

This code turns any variable into Sentence Case

Rate This code turns any variable into Sentence Case

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Dim temp as string
dim q as integer
temp = text1.text
For q = st To st + sl
    If Mid(temp, q, 1) = " " Then
        Mid(temp, q + 1, 1) = UCase(Mid(temp, q + 1, 1))
    ElseIf q = 1 Then
        Mid(temp, 1, 1) = UCase(Mid(temp, 1, 1))
    End If
    Next q
    text1.text = temp
end sub