Language Basics VB.Net

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