Question

求VB代码如题 在Text1中输入一串字符点击处理在Text2中逆序输出 烦死了做了一晚上了不行啊

Answer 1

private sub command1_click()
Text2=""
for i=len(text1) to 1 step -1
text2=text2 & mid(text1,i,1)
next
end sub

Answer 2

子Command1_Click（）
= Text1.Text
L = LEN（S）
对于i = 1到L
T = MID（S，I，1）吨
接下来，我
Text2.Text = T
END SUB

Answer 3

text2.text=StrReverse(text1.text)