请VB高手帮帮忙

2025-04-27 01:18:24
推荐回答(1个)
回答1:

函数:
Private Function IsReverse(Str As String) As Boolean
IsReverse = Str = StrReverse(Str)
End Function
测试函数的过程:
Private Sub Form_Click()
MsgBox IsReverse("ABCDCBA")
MsgBox IsReverse("ABCA")
End Sub