提交一个增强版的“分割文本”命令-可以合并多个连续分隔符

dangerace · 发表于 2018-11-6 13:32:07

本帖最后由 dangerace 于 2018-11-6 13:40 编辑

当前核心库的“分割文本”命令，当分割符为连续多个时，返回结果比较不如人意，需要自己再重新处理一下。一下我提交一个增强版的“分割文本”命令，可以将多个连续相同的分割符视为一个分隔符，从而得到较为合理的结果。

窗口程序集名	保留	保留	备注
程序集1

子程序名	返回值类型	公开	备注
_启动子程序	整数型		请在本子程序中放置易模块初始化代码

_临时子程序 () ' 在初始化代码执行完毕后调用测试代码
返回 (0) ' 可以根据您的需要返回任意数值

子程序名	返回值类型	公开	备注
_临时子程序

变量名	类型	静态	数组	备注
返回数组	文本型		0

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
分割文本_plus (“1,2,,3,,,,4”, , , 返回数组)
调试输出 (返回数组)
分割文本_plus (“a b c d e ”, “ ”, , 返回数组)
调试输出 (返回数组)

子程序名	返回值类型	公开	备注
分割文本_plus			能够将连续的分隔符视为一个分隔符
参数名	类型	参考	可空	数组	备注
待分割文本	文本型
分隔符	文本型
返回子文本数目	整数型
返回数组	文本型

变量名	类型	静态	数组	备注
i	整数型
临时数组	文本型		0

重定义数组 (返回数组, 假, 0)

如果真 (分隔符＝ “”)

分隔符＝ “,”

如果 (返回子文本数目＝ 0)

临时数组＝分割文本 (待分割文本, 分隔符, )

临时数组＝分割文本 (待分割文本, 分隔符, 返回子文本数目)
调试输出 (临时数组)

计次循环首 (取数组成员数 (临时数组), i)

如果真 (临时数组 [i] ≠ “”)

加入成员 (返回数组, 临时数组 [i])

计次循环尾 ()

i支持库列表	支持库注释
spec	特殊功能支持库

到底是法师6 · 发表于 2018-11-26 14:39:15

66655555555555

10479244 · 发表于 2018-11-22 19:27:52

学习了，谢谢楼主

轻风影 · 发表于 2018-11-19 21:42:52

有创意，不错

简简2046 · 发表于 2018-11-18 08:15:34

感觉没啥用

z89169628 · 发表于 2018-11-14 20:30:21

顶帖子支持

项目部002 · 发表于 2018-11-9 14:32:24

针对获取非空成员获取比较简便，在原分割的基础上过滤。虽然经常都是自己写过滤，整合成一个命令也是不错的选择。

badlwolf · 发表于 2018-11-7 14:10:51

哈哈哈，这个好，支持作者

dangerace · 发表于 2018-11-6 13:32:40

正在封装易格式目的代码
开始运行被调试程序
* 数组:8{“1”,“2”,“”,“3”,“”,“”,“”,“4”}
* 数组:4{“1”,“2”,“3”,“4”}
* 数组:19{“a”,“b”,“”,“”,“”,“”,“c”,“”,“”,“d”,“e”,“”,“”,“”,“”,“”,“”,“”,“”}
* 数组:5{“a”,“b”,“c”,“d”,“e”}

被调试易程序运行完毕

		自动登录	找回密码
密码			注册

[已回应] 提交一个增强版的“分割文本”命令-可以合并多个连续分隔符

点评

评分