日期:2014-05-17  浏览次数:20878 次

这样的功能如何实现?不太好描述啊,进来再说吧-_-!!
比如有一个字符串:我爱祖国天安门
我想通过一个函数将上面那个字符串格式成这样:我爱,爱祖,祖国,国天,天安,安门
即依次两个字两个字的隔开.
若设置的是三个字,那么就会变成:我爱祖,爱祖国,祖国天,国天安,天安门

咋整?

------解决方案--------------------
可以如下实现的思路:
取得字符串的长度
然后用字符串长度减去设置的字数,然后进行循环截取
比如“我爱祖国天安门” 长度是7
设置按2个个字分开,那么用7-2=5
然后循环截取
即:
VBScript code

str="我爱祖国天安门"
for i=1 to 5
response.write mid(str,i,2)
response.write "<br>"
next

------解决方案--------------------
可以如下实现的思路:
取得字符串的长度
然后用字符串长度减去设置的字数,然后进行循环截取
比如“我爱祖国天安门” 长度是7
设置按2个个字分开,那么用7-2=5
然后循环截取

------解决方案--------------------
str="我爱祖国天安门"
for i=1 to 5
response.write mid(str,i,2)
response.write "<br>"
next
正解~变形~
str="我爱祖国天安门"
dim n
n=2
for i=1 to len(str)
response.write mid(str,i,n)
response.write "<br>"
next
呵呵~我是抄上面的~