-
天空兄弟是对的,但有一个小错误。 我应该从后到前,哈哈,其实没必要那么麻烦,有功能可用:
private sub command1_click()text2 = ""
text2 = strreverse(
end sub
-
绿维艺朋友介绍了VB提供的功能,就是你想要的功能!
但这显然不是老师想要的答案。
for i = len( to 1 step -1= & mid(,i,1)
next i
-
手机打字不是很方便,核心**如下:
for i=1 to len(
i,1) ltrim(
接下来,你可以做,看看......
-
我的方法... 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
-
dim string as string ="我喜欢穿棉袄"
dim character() 作为 char
dim string 反转字符串作为字符串 =""
如果字符串。 长度 > 0 然后 字符 (string. length - 1)对于 i 作为整数 = 0 到字符串。longcount - 1
字符 (i) = 字符串。 substring(i, 1)next
对于 i 作为整数 = 字符。 length - 1 to 0 step -1
字符串反 &= (字符 (i))。
nextmsgbox(字符串反转)。
end if
-
我也学过VB,但是刚开始学,看到这个程序的设计不好,但是它冒泡了。
-
VB 有自己的回序输出字符串函数。
strreverse(s)
返回 s 字符串的相反顺序。
楼上,你写的好像是c**的思路,如果用vb,就要注意四舍五入。 >>>More
shell 函数是 VB 中的一个内部函数,负责执行一个可执行文件,如果成功则返回一个 variant(double),表示程序的进程 ID,如果不成功,则返回 0。 >>>More
思路:要求一个正整数n的位数,可以先定义一个变量num,并初始化为0,将整数n依次除以10,直到为0,每除以10,变量num的个数就会加1,最后一个num的值就是整数n的位数。 >>>More
格斗、动作、战争棋、飞行射击、FPS、策略、赛车,这些类型的VB都可以做到,网上有源码,就看你学得有多好了。 似乎没有适用于 VB 的实时战略游戏,但我认为这是完全可能的。