How to use StrReverse function and analyze palindromes

This article introduces you how to use the StrReverse function and palindromes analysis, the content is very detailed, interested friends can refer to, hope to be helpful to you.

Can the number of palindromes be so simple? Application of StrReverse function

Palindromes (symmetrical numbers)

12321 、 11 、 121

Features: read and write forward and reverse to get the same result

Negative numbers and decimals have no palindromes.

Strreverse function

StrReverse (string parameter) returns a string of "reverse output"

Classroom summary

1. Master the application of StrReverse function.

2. When comparing, it is best to compare with the same data type. 3. Learn the declaration of symbolic variables.

Interface:

Source code:

Private Sub Command1_Click () Dim slots, i&Text2.Text = "" For I = 0 To Val (Text1.Text) Step 1'to determine whether it is the palindrome number If CStr (I) = StrReverse (CStr (I)) Then Text2.Text = Text2.Text & I & "," End If Next i "

End Sub

On how to use the StrReverse function and palindromes analysis is shared here, I hope that the above content can be of some help to you, can learn more knowledge. If you think the article is good, you can share it for more people to see.