TextInfo.ToTitleCase Converts the specified string to titlecase.
Imports System Imports System.Globalization Public Class SamplesTextInfo Public Shared Sub Main() Dim myString As String = "this IS a Test" Dim myTI As TextInfo = New CultureInfo("en-US", False).TextInfo Console.WriteLine(myTI.ToLower(myString)) Console.WriteLine(myString, myTI.ToUpper(myString)) Console.WriteLine(myString, myTI.ToTitleCase(myString)) End Sub End Class