用VB设计一个程序,将输入的字符串以反序显示

如题所述

第1个回答  2020-02-17
Private
Sub
Command1_Click()
Dim
S
As
String,
T
As
String
S
=
InputBox("输入一个字符串")
Print
T
Dim
I
As
Integer
For
I
=
Len(S)
To
1
Step
-1
T
=
T
&
Mid(S,
I,
1)
Next
Print
T
End
Sub最简单的Private
Sub
Command1_Click()
Dim
S
As
String,
T
As
String
S
=
InputBox("输入一个字符串")
'T
=
StrReverse(S)
End
Sub
第2个回答  2020-02-20
dim strinput as string
'strinput用来存储你输入的字符串,存储方法自行写.
dim i as integer
dim stroutput as string ' 用来存储输出字符串
for i = len(strinput) - 1 to 0
stroutput = stroutput & mid(strinput, i, 1)
next i
debug.print stroutput
相似回答