字符串截取指定长度的函数

[dfwxj]

一个简单的函数，返回一个字符串按指定长度依次截取第N段的内容，不受双字节影响。参照十豆三提供的代码实现。


Function cutstr
Parameters cstr,nLen,N
Private newstr,i
For i=1 To N
newstr=Iif(Between(Asc(Rightc(Left(cstr,nlen),1)),128,255),Left(cstr,nlen-1),Left(cstr,nlen))
cstr=Iif(Between(Asc(Rightc(Left(cstr,nlen),1)),128,255),Substr(cstr,nlen),Substr(cstr,nlen+1))
Endf
Return newstr

[dfwxj]

cutstr(原字符串,每段长度,第几段) 确保每次截取不超过指定长度，并且不截断双字节

[lygcw9602]

函数中的参数什么意思

[gyyimut]

很好，谢谢分享

[十豆三]

多谢分享，收藏备用。

[jyxfp]

谢谢分享 收藏备用

[qq_16833873]

学习了 收藏备用 谢谢