用VB編程，將輸入的字符串以反序輸出？使用VB編程，輸入的字符串將按相反順序輸出兩種方法：代碼如下private sub command1 Click（）dim s as string，t as st

用VB編程，將輸入的字符串以反序輸出？

使用VB編程，輸入的字符串將按相反順序輸出

兩種方法：代碼如下

private sub command1 Click（）

dim s as string，t as string

s=InputBox（“input a string”

print t t t

dim I as integer

for I=len（s）to 1 step-1

t=t&；mid（s，I），1）

下一個

打印t

結(jié)束Su

第二個簡單版本。

Private Sub Command1 Click（）

dim s as string，t as string

s=InputBox（“input a string”）

]“t=strreverse（s）

end Sub

VB6.0可以使用strreverse函數(shù)實現(xiàn)逆序輸出。strreverse函數(shù)返回指定子字符串的字符順序顛倒的字符串語法：strreverse（string1）參數(shù)string1是字符順序顛倒的字符串。如果string1是長度為零的字符串（“”），則返回長度為零的字符串。如果string1為null，則生成錯誤。演示代碼：

~]#include<stdio。H>#包含<string。H> void input（char st）//定義void reverse（char st）//定義inverse 2113 function int main（）{char s[20]input（s）//調(diào)用輸入函數(shù)printf（“原始字符串%sn”，s）//輸出原始字符串5261 reverse（s）//調(diào)用inverse 4102 function printf（“新字符串%sn”，s） //輸出逆序字符串return 0}void input（char st）}{printf（“please enter string:”）get（st）}//逆序函數(shù)void reverse（char st）}{int n=strlen（st）for（int i=0，j=n-1，ti<（n/2）t=st[i]，st[i]=st[j]，st[j]=t，i，j--}