成人AV在线无码|婷婷五月激情色,|伊人加勒比二三四区|国产一区激情都市|亚洲AV无码电影|日av韩av无码|天堂在线亚洲Av|无码一区二区影院|成人无码毛片AV|超碰在线看中文字幕

將輸入的字符串以反序顯示 用VB編程,將輸入的字符串以反序輸出?

用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,則生成錯誤。演示代碼: