在vb求出100-999范围的回文数.
问题描述：
在vb求出100-999范围的回文数.
回文数就是倒过来还是那个数字、比如151
答
Private Sub Command1_Click()For i = 100 To 999If Left(i, 1) = Right(i, 1) ThenPrint i;n = n + 1If n Mod 10 = 0 Then PrintEnd IfNext iEnd Sub