专家坐堂-字符串拆分问题求助Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  字符串拆分问题求助  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=84067)

--  作者：cha618
--  发布时间：2016/4/22 14:33:00
--  字符串拆分问题求助
比如将字符串 str ="字符串拆分问题求助" 按每 2个字符依次进行拆分如何写代码最高效

--  作者：大红袍
--  发布时间：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