string的自加

来源:百度知道 编辑:UC知道 时间:2024/05/25 10:50:11
我想在vb终实现一个例如 "aaaaaa"的字符串的自加
即"aaaaaa"变为"aaaaab"这样该怎样实现呢?谢谢~~~
我的意思是相同的位数。。。

dim str as String
str="aaaaa"
str=left(str,len(str)-1) & chr(asc(right(str,1))+1)
这样就可以了!!!!

ascii码相加?
dim s as string
s="aaaaaa"
你想让s+1之后="aaaaab"
那就取出最后一位,判断其ASCII码,然后加上1,再转换成字符

*
**
***
****
怎么实现的?