|
-
Sep 27th, 2000, 01:31 PM
#1
Thread Starter
Junior Member
I posted 3 different threads and was told I could have just posted one but I don't know how. What I mean is I posted a thread and after I though of other questions that dealt with the first thread. I didn't know how to put the other two threads on the first one I'm new so could some one help thanks.
and since I have this form open can some one give me a description for this code line by line and also explain how to creat a form for the code.
Dim str Palindrome As String
Dim StrStrip As String
Dim intIndex As Integer
str Palindrome = " "
For intIndex = 1 Tp Len(strPalindrome)
If Mid$(strPalindrome, intIndex, 1) <> " " Then
strStrip = strStrip & Mid$(strPalindrome, intIndex, 1)
End If
Next
If UCase(strStrip) = StrReverse(UCase(strStrip))Then
MsgBox "It's A Palindrome"
End If
When I ran this code before I could finish entering a sentence or work I got a message box saying it's a palindrome.
Thanks for the Help!!!
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
Click Here to Expand Forum to Full Width
|