文本取重复部分 和去重复部分

啊森哥哥

比方文本是:  1,1,2,2,3,4,5,6,7,
取存在大于等于 2 数量的 文本     那么要的结果是    1,2,

取存在小于 2 数量的文本    那么要的结果是   3,4,5,6,7,
这种精益模块里有什么命令能实现  ... 我自己看着有些懵  想找个 例程  ..

大司命

啊森哥哥 发表于 2019-9-11 12:18
不是这个意思哦  这种 我会写的  我指的是   5,5,6,6,7,8,9,          5有2个 6有2个 所以取  5 和 6

  

变量名	类 型	静态	数组	备 注
g_Array	文本型		0
g_Str	文本型
g_node	节点
g_len	整数型
i	整数型

g_Array ＝ 分割文本 (“1,1,2,2,3,4,5,6,7,”, “,”, )
计次循环首 (取数组成员数 (g_Array), i)
如果真 (g_node.加入属性 (g_Array [ i ], 1) ＝ 假)
g_node.取数值 (g_Array [ i ], g_len)
g_len ＝ g_len ＋ 1
g_node.修改属性 (g_Array [ i ], g_len)

计次循环尾 ()
清除数组 (g_Array)
g_node.取全部属性名 (g_Array)
计次循环首 (取数组成员数 (g_Array), i)
g_node.取数值 (g_Array [ i ], g_len)
如果真 (g_len ＜ 2)
g_Str ＝ g_Str ＋ g_Array [ i ] ＋ “,”

计次循环尾 ()
输出调试文本 (g_Str)

.局部变量 g_Array, 文本型, , "0"<br /> .局部变量 g_Str, 文本型<br /> .局部变量 g_node, 节点<br /> .局部变量 g_len, 整数型<br /> .局部变量 i, 整数型<br /> g_Array ＝ 分割文本 (“1,1,2,2,3,4,5,6,7,”, “,”, )<br /> .计次循环首 (取数组成员数 (g_Array), i)<br />     .如果真 (g_node.加入属性 (g_Array [ i ], 1) ＝ 假)<br />         g_node.取数值 (g_Array [ i ], g_len)<br />         g_len ＝ g_len ＋ 1<br />         g_node.修改属性 (g_Array [ i ], g_len)<br />     .如果真结束<br /> .计次循环尾 ()<br /> 清除数组 (g_Array)<br /> g_node.取全部属性名 (g_Array)<br /> .计次循环首 (取数组成员数 (g_Array), i)<br />     g_node.取数值 (g_Array [ i ], g_len)<br />     .如果真 (g_len ＜ 2)<br />         g_Str ＝ g_Str ＋ g_Array [ i ] ＋ “,”<br />     .如果真结束<br /> .计次循环尾 ()<br /> 输出调试文本 (g_Str)

m656655

两次循环 1跟112234567 把本身去一下 就是1跟12234567比  第三次是2跟11234567比

大司命

  

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

g_Array ＝ 分割文本 (“1,1,2,2,3,4,5,6,7,”, “,”, )
数组_去重复 (g_Array, )
计次循环首 (取数组成员数 (g_Array), i)
如果真 (到整数 (g_Array [ i ]) ≤ 2)  ' 比较~
g_Str ＝ g_Str ＋ g_Array [ i ] ＋ “,”

计次循环尾 ()
输出调试文本 (g_Str)

.局部变量 g_Array, 文本型, , "0"<br /> .局部变量 g_Str, 文本型<br /> .局部变量 i, 整数型<br /> g_Array ＝ 分割文本 (“1,1,2,2,3,4,5,6,7,”, “,”, )<br /> 数组_去重复 (g_Array, )<br /> .计次循环首 (取数组成员数 (g_Array), i)<br />     .如果真 (到整数 (g_Array [ i ]) ≤ 2)  ' 比较~<br />         g_Str ＝ g_Str ＋ g_Array [ i ] ＋ “,”<br />     .如果真结束<br /> .计次循环尾 ()<br /> 输出调试文本 (g_Str)

hanson1025

样式.e (865.89 KB, 下载次数: 42)

2019-9-11 11:22 上传

点击文件名下载附件
我是这样干的

wlsk888

.版本 2

.程序集 窗口程序集_启动窗口

.子程序 _按钮1_被单击
.局部变量 临时数组, 文本型, , "0"
.局部变量 次数, 整数型

编辑框_结果.内容 ＝ “”
临时数组 ＝ 分割文本 (编辑框_文本.内容, , )
数组_去重复 (临时数组)
.计次循环首 (取数组成员数 (临时数组), 次数)

    .如果真 (到整数 (临时数组 [次数]) ≥ 2)
        编辑框_结果.加入文本 (临时数组 [次数] ＋ “,”)
    .如果真结束

.计次循环尾 ()
.如果真 (取文本右边 (编辑框_结果.内容, 1) ＝ “,”)
    编辑框_结果.内容 ＝ 取文本左边 (编辑框_结果.内容, 取文本长度 (编辑框_结果.内容) － 1)
.如果真结束


.子程序 _按钮2_被单击
.局部变量 临时数组, 文本型, , "0"
.局部变量 次数, 整数型

编辑框_结果.内容 ＝ “”
临时数组 ＝ 分割文本 (编辑框_文本.内容, , )
数组_去重复 (临时数组)
.计次循环首 (取数组成员数 (临时数组), 次数)
    .如果真 (到整数 (临时数组 [次数]) ≤ 2)
        编辑框_结果.加入文本 (临时数组 [次数] ＋ “,”)
    .如果真结束

.计次循环尾 ()
.如果真 (取文本右边 (编辑框_结果.内容, 1) ＝ “,”)
    编辑框_结果.内容 ＝ 取文本左边 (编辑框_结果.内容, 取文本长度 (编辑框_结果.内容) － 1)

啊森哥哥

大司命 发表于 2019-9-11 10:04
[e=5]
.局部变量 g_Array, 文本型, , "0"
.局部变量 g_Str, 文本型

不是这个意思哦  这种 我会写的  我指的是   5,5,6,6,7,8,9,          5有2个 6有2个 所以取  5 和 6  

hao1997

先分割文本然后两个几次循环