易语言超级列表框重复项目

seven7c

项目1	项目2
测试重复文本
这里是其他项目1
测试重复文本
这里是其他项目2
测试重复文本 这里是其他项目3   测试重复文本

有以上的数据在超级列表框内， 我想得出一个结果是

先去除重复的项目  然后在 项目2  那一列 列出项目1 中的项目重复了多少次.(如下)

项目1	项目2
测试重复文本	4次
这里是其他项目1	1次
这里是其他项目2	1次
这里是其他项目3	1次

如果觉得给的分数底  我可以再加分.

exit11

[e].版本 2
.支持库 iext

.子程序 _按钮1_被单击
.局部变量 x, 整数型
.局部变量 临时文本, 文本型
.局部变量 重复次数, 整数型
.局部变量 索引, 整数型

.计次循环首 (超级列表框1.取表项数 (), x)

    临时文本 ＝ 超级列表框1.取标题 (索引, 0)
    重复次数 ＝ 到整数 (超级列表框1.取标题 (索引, 1))
    超级列表框1.置标题 (索引, 1, 到文本 (重复次数 ＋ 1))

    .判断循环首 (超级列表框1.查找表项 (临时文本, 索引 ＋ 1, , 0) ≠ -1)
        重复次数 ＝ 到整数 (超级列表框1.取标题 (索引, 1))
        超级列表框1.置标题 (索引, 1, 到文本 (重复次数 ＋ 1))
        超级列表框1.删除表项 (超级列表框1.查找表项 (临时文本, 索引 ＋ 1, , 0))
    .判断循环尾 ()
    索引 ＝ 索引 ＋ 1
.计次循环尾 ()
[/e]

金哥专用

问题不难  就是没时间帮你弄了。