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

来源:百度知道 编辑:UC知道 时间:2024/04/29 18:44:15
比如: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

直接用InStrRev("abc")不就行了

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"

自己来!
dim a
a="12345"
a="54321"
嘿嘿