VB 编程以相反的顺序显示输入字符串。

我的方法... MID 函数，逐个提取，然后重新添加。

这个 strreverse（string）。

这被称为递归。

编写以下函数：

function revertstring(strold as string) as string

dim strtemp as stringdim i as integer

for i = len(strold) to 1 step -1strtemp = strtemp & mid(strold, i, 1)

nextrevertstring = strtempend function

测试。 private sub command1_click()msgbox revertstring("123456")end sub

private sub form_click()word = "abcde"

print "输入字符串为：" & wordjieguo = strreverse(word)print "反向顺序结果：" & jieguoend sub

'text1 对应于您的输入字符串。

text2 是一个回序字符串。

command1 对应于 Detach 和 Reverse Order 按钮。

命令2。

其中 A 对应于 97 Z 的 ASCII 代码和相应的 ASCII 代码 122

A 对应 ASCII 代码 65 Z 对应 ASCII 代码 90

private sub command1_click()

计算逆代码。 if <>"" then

for i = 0 to len( -1

c = mid(, len( -i, 1)

if asc(c) >65 and asc(c) <90 or asc(c) >97 and asc(c) <122 then

是一个字母，则显示输出。

celse

end if

nextend if

end sub

private sub command2_click()'清除。

end sub

有一个我不明白的重新连接。

for i = 1 to len(

if asc(mid(, i, 1)) 64 and asc(mid(, i, 1)) 122 and asc(mid(, i, 1)) 96 then

s = mid(, i, 1) +s

end if

next i= s

一楼有点问题，应该是&

当你失去渣滓手时，将戒指倒置。

例如，谈论怀疑原来是。

for i=0 to 10

已更改为。 for i=10 to 1 step -1