刘金玉的零基础VB教程077期：
回文数可以如此简单？StrReverse函数运用
回文数（对称数）
12321、11、121
特点：正向读写与反向读写得到同一个结果
负数、小数没有回文数
Strreverse函数
StrReverse(字符串参数) 返回一个“逆序输出”的字符串
课堂总结
1、掌握StrReverse函数的运用
2、比较的时候最好转成同一个数据类型来比较 3、学会符号变量的声明
界面：
源代码：
Private Sub Command1_Click() Dim s$, i& Text2.Text = "" For i = 0 To Val(Text1.Text) Step 1 '判断是否是回文数 If CStr(i) = StrReverse(CStr(i)) Then Text2.Text = Text2.Text & i & "," End If Next i End Sub
