Question

2. Write a program that takes a word that a user enters into a textbox, and displays the word reversed in an output text box. If the word is a palindrome (if the reversed word is the same as the initial word like mom, dad, anna), have a message box appear saying the word entered is a palindrome. You may use either a pretest or posttest do loop. Change werd ChangeWord Word apple Word: hannah Flp Word Backwards Result elppa Flip Word Backwards Result: hannah Word entered is a palindrome! OK

Answer 1

Public Class Form1
Public Function IsPalindrome_new(src As String) As Boolean
Dim palindrome As Boolean = True
For i As Integer = 0 To src.Length \ 2
If src(i) <> src(src.Length - i - 1) Then
palindrome = False
Exit For
End If
Next
Return palindrome
End Function
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
If (IsPalindrome_new(strText.Text)) Then
result.Text = StrReverse(strText.Text)
MsgBox("word enterd is pallindrome")
Else
result.Text = StrReverse(strText.Text)
MsgBox("word enterd is NOT pallindrome")
End If
End Sub
End Class

if you have any doubt then please ask me without any hesitation in the comment section below , if you like my answer then please thumbs up for the answer , before giving thumbs down please discuss the question it may possible that we may understand the question different way and we can edit and change the answers if you argue, thanks :)