vb中将字符串反转的代码是什么?

比如:abc-cba

代码如下,你在Text1中输入原字符串后按Command1按钮Text2中就出现与原字符串逆序的字符串:
Dim Str as String

Private Sub Form_Click()
Text1 = ""
Text2 = ""
End Sub

Private Sub Command1_Click()
Str = Text1
Text2 = StrReverse(Str)
End Sub
温馨提示:答案为网友推荐,仅供参考
第1个回答  2007-01-23
Function FanZhuan(str)
Dim str1
For i = 1 to Len(str)
str1=Mid(str,i,1) & str1
Next
FanZhuan=str1
End Function

FanZhuan("abc")就返回"cba"
第2个回答  2007-01-23
直接用InStrRev("abc")不就行了
第3个回答  2007-01-23
自己来!
dim a
a="12345"
a="54321"
嘿嘿
相似回答