这篇文章给大家介绍vbs中怎么实现一个字符串分割函数，内容非常详细，感兴趣的小伙伴们可以参考借鉴，希望对大家能有所帮助。
创新互联公司专注于嘉定企业网站建设,
自适应网站建设,
商城网站定制开发。嘉定网站建设公司,为嘉定等地区提供建站服务。全流程按需策划设计，专业设计，全程项目跟踪，
创新互联公司专业和态度为您提供的服务
Function CutAndJoin(sSource, iLong, sJoiner)
Dim I, N
N = Len(sSource) / iLong
If(N <> Fix(N))Then N = Fix(N) + 1
For I = 0 To N - 1
CutAndJoin = CutAndJoin & Mid(sSource, I * iLong + 1, iLong) & sJoiner
Next
If(N > 0)Then CutAndJoin = Left(CutAndJoin, Len(CutAndJoin) - Len(sJoiner))
End Function
WScript.Echo(CutAndJoin("hello world!", 1, "$"))关于vbs中怎么实现一个字符串分割函数就分享到这里了，希望以上内容可以对大家有一定的帮助，可以学到更多知识。如果觉得文章不错，可以把它分享出去让更多的人看到。
新闻名称：vbs中怎么实现一个字符串分割函数-创新互联
本文链接：
http://www.cdkjz.cn/article/jipje.html
