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