Public Class clsToLower
 
    Public Sub Main()
 
        '****************************************************************************************
        ' Purpose:  Returns a string or character in lowercase.
        '
        ' Syntax: 	strToBeLowered.ToLower
        '
        ' Parameter1: strToBeLowered - Required - string to be converted to lowercase
        '
        ' Result: string - Returns a string or character in lowercase. 
        '
        ' Quick Example:  Dim strToLowerExample As String = "This is a test string"
        ' Return Lowercase
        ' Console.WriteLine(strToLowerExample.ToLower)
        '
        '****************************************************************************************
 
        '****************************************************************************************
        ' Example #1: ToLower
        ' Returns the string in Lowercase
        '****************************************************************************************
 
        Console.WriteLine("Example #1: ToLower")
 
        Dim strToLowerExample As String = "This is a test string"
 
        ' Return Lowercase
        Console.WriteLine(strToLowerExample.ToLower)
 
        'write blank line to make output easier to read
        Console.WriteLine()
 
 
 
        'Prevent console from closing before you press enter
        Console.ReadLine()
 
    End Sub
 
 
End Class

Module Module1
 
    Sub Main()
 
 
        Dim myclsToLower As New clsToLower
        myclsToLower.Main()
 
 
 
    End Sub
 
End Module