Tuesday, February 22, 2011

Write a Visual Basic Program to check given no. is Palindrome or not by using Form

WAP to check given no. is Palindrome or not by using Form.
_________________________________________________

Private Sub Command1_Click()
Dim a, b, c
a = Text1.Text
b = StrReverse(Text1.Text)
c = StrComp(a, b)
If (c = 0) Then
Text2.Text = "Given string is Palindrome!"
Else
Text2.Text = "Given Sting is not a Palindrome!"
End If
End Sub

Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""

End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()

End Sub


_____________________________________________
OUTPUT
_____________________________________________



____________________________________
DOWNLOAD
____________________________________

Download its form

Download its Image



No comments:

Post a Comment