Reverse string using recursion in vb.net

Vb program for Reverse string using recursion. Here problem description and explanation.

' Include namespace system
Imports System 
'  Reverse string using recursion in Vb.net

Public Class ReverseString
    '  This is reversing the string elements recursively
    Public Function  reverseText(ByVal text As String, 
                                 ByVal location As Integer) As String
        '  Base condition to stop the recursion process
        if (location >= 0) Then
            '  Recursive function call
            Return  text(location).ToString() + 
              Me.reverseText(text, location - 1)
        End If
        '  When no character remaining
        Return  ""
    End Function
    '  This is handling the request process of reverse string elements
    Public Function  reverse(ByVal text As String) As String
        '  Display given string elements
        Console.WriteLine("Before Text : [" + text + "]")
        Return  Me.reverseText(text, text.Length - 1)
    End Function
    Public Shared Sub Main(ByVal args As String())
        Dim task As ReverseString = New ReverseString()
        Dim text As String = "ABCDE"
        text = task.reverse(text)
        '  After reverse	
        Console.WriteLine("After Text  : [" + text + "]"& vbLf )
        text = task.reverse("654A321")
        '  After reverse	
        Console.WriteLine("After Text  : [" + text + "]"& vbLf )
    End Sub
End Class

Output

Before Text : [ABCDE]
After Text  : [EDCBA]

Before Text : [654A321]
After Text  : [123A456]