设计一个算法判断顺序存放的字符串是否为回文

Function Huiwen(a as string) as Boolean
if a=StrReverse(a) then
Huiwen=true
Else
Huiwen=false
End Function

StrReverse 函数 (Visual Basic)
返回指定字符串的字符顺序是相反的字符串。
Public Function StrReverse(ByVal Expression As String) As String
参数
Expression
必选。字符反转的字符串表达式。如果 Expression 是一个零长度字符串 ("")，则返回一个零长度字符串。
备注
StrReverse 函数返回的字符串包含的字符与 Expression 中的字符相同，但字符的顺序相反。