vbs中怎么实现一个字符串分割函数-创新互联

这篇文章给大家介绍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中怎么实现一个字符串分割函数-创新互联
链接URL:http://lszwz.com/article/jipje.html

其他资讯

售后响应及时

7×24小时客服热线

数据备份

更安全、更高效、更稳定

价格公道精准

项目经理精准报价不弄虚作假

合作无风险

重合同讲信誉,无效全额退款