Foxtable(狐表)用户栏目专家坐堂 → 字符串拆分问题求助


  共有2159人关注过本帖树形打印复制链接

主题:字符串拆分问题求助

帅哥哟,离线,有人找我吗?
cha618
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:37 积分:342 威望:0 精华:0 注册:2016/3/2 10:15:00
字符串拆分问题求助  发帖心情 Post By:2016/4/22 14:33:00 [只看该作者]

比如 将字符串 str ="字符串拆分问题求助"  按每 2个字符依次进行拆分 如何写代码 最高效

 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/4/22 14:46:00 [只看该作者]

Dim str ="字符串拆分问题求助"
Dim i As Integer = 0
Do While True
    If i < str.length - 2 Then
        output.show(str.substring(i,2))
    Else
        output.show(str.substring(i))
        Exit Do
    End If
    i += 2
Loop

 回到顶部