精易论坛

标题: 文本_取分隔符 能取出1-n个分隔符 [打印本页]

作者: 格视化    时间: 2019-4-4 01:53
标题: 文本_取分隔符 能取出1-n个分隔符
本帖最后由 格视化 于 2019-4-4 02:47 编辑

给需要的人吧。

文本_取分隔符.e (757.18 KB, 下载次数: 39)

作者: xiaoming007    时间: 2019-4-4 09:07
沙发沙发。。。
作者: kyo9766    时间: 2019-4-4 09:39
看着好像还能取多个分隔符啊,感谢分享
作者: 小白很黑    时间: 2019-4-4 10:11
本帖最后由 昵称为空零 于 2019-4-4 10:13 编辑
  
子程序名返回值类型公开备 注
文本_取分隔符文本型 
参数名类 型参考可空数组备 注
原文本文本型
变量名类 型静态数组备 注
单字分割文本型0
i整数型 
分隔符文本型 
文本_逐字分割 (原文本, 单字分割)
计次循环首 (取数组成员数 (单字分割), i)
如果 (文本_是否为字母 (单字分割 [i]) 文本_是否为汉字 (单字分割 [i]) 文本_是否为数字 (单字分割 [i]))
如果真 (寻找文本 (分隔符, 单字分割 [i], , ) = -1 取文本长度 (分隔符) > 0)
跳出循环 ()
分隔符 = 分隔符 + 单字分割 [i]

如果真 (分隔符 ≠ “”)
跳出循环 ()


计次循环尾 ()
返回 (分隔符)



楼主那个,如果多个分隔符的话,就会全部连接在一起了,就不对了.   加了2句,改进下.  只取第一个出现的分隔符.

当然利用这个思路,也可以分别取出多个不同的分隔符.  具体就自由发挥了.


作者: Dakk    时间: 2019-4-4 11:37
这个还不错
作者: jy88lt    时间: 2019-4-4 15:28
来学习学习
作者: xiaoming007    时间: 2019-4-5 09:15
感谢分享,下载研究了
作者: hl513344    时间: 2019-4-11 08:21
感谢分享,下载研究了
作者: a3960382663    时间: 2019-4-11 20:04





欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4