用VB编写程序，判断一字符串是否是回文（例如，abcdedcba是回文，而abcdedfa不是）
发布网友
发布时间：2022-10-13 00:43
共1个回答
热心网友
时间：2023-10-25 18:14
s = Text1.Text
l = Len(s)
flg = True
For i = 1 To l \ 2
If Mid(s, i, 1) <> Mid(s, l + 1 - i, 1) Then
flg = False
End If
Next i
If flg = True Then
Print s & "是回文数"
Else
Print s & "不是回文数"
End If
End Sub
