国产成人毛片视频|星空传媒久草视频|欧美激情草久视频|久久久久女女|久操超碰在线播放|亚洲强奸一区二区|五月天丁香社区在线|色婷婷成人丁香网|午夜欧美6666|纯肉无码91视频

將輸入的字符串以反序顯示 用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)

下一個(gè)

打印t

結(jié)束Su

第二個(gè)簡單版本。

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ù)實(shí)現(xiàn)逆序輸出。strreverse函數(shù)返回指定子字符串的字符順序顛倒的字符串語法:strreverse(string1)參數(shù)string1是字符順序顛倒的字符串。如果string1是長度為零的字符串(“”),則返回長度為零的字符串。如果string1為null,則生成錯(cuò)誤。演示代碼: