Question

How to check if a number is palindrome recursively in VB.NET

Answer 1

Module Module1

    Sub Main()

        Dim n As Integer = 12321

        If (recursiveCheckPalindrome(n) = True) Then
            Console.WriteLine("Palindrome")
        Else
            Console.WriteLine("NOT Palindrome")
        End If

    End Sub

    Function recursiveCheckPalindrome(n As Integer) As Boolean

        Static inverse_number As Integer = 0

        If (n = 0) Then Return False
        inverse_number = (inverse_number * 10) + (n Mod 10)
        recursiveCheckPalindrome(n / 10)

        Return n = inverse_number

    End Function

End Module

'run:
' 
'Palindrome

 

70+ SQL courses for beginners and professionals