Public Class clsLeft
 
    Public Sub Main()
 
        '****************************************************************************************
        ' Purpose:  Returns a string containing a specified number of characters from the left
        ' side of a string.
        '
        ' Syntax: 	Left(str As String, Length As Integer) As String
        '
        ' Parameter1: str - Required - String expression from which characters will be returned.
        '
        ' Parameter2: Length - Required - Specifies number of characters to return.
        '
        ' Result: string - Returns a string containing a specified number of characters from the left
        ' side of a string.
        '
        ' Quick Example:   Console.WriteLine(Left("Ideal Programmer", 5)) ' Returns Ideal
        '
        '****************************************************************************************
 
 
        Console.WriteLine("Example #1: 	Left(str As String, Length As Integer) As String")
 
        Console.WriteLine(Left("Ideal Programmer", 5)) ' Returns Ideal
 
 
        '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 myclsLeft As New clsLeft
        myclsLeft.Main()
 
 
 
    End Sub
 
End Module