易语言超级列表框怎样删除里面的重复项?
.参数 超级列表框, 超级列表框, , 对象
.参数 列索引, 整数型, ,
.参数 列索引1, 整数型,
.参数 列索引2, 整数型,
.局部变量 计次, 整数型
.局部变量 文本, 文本型
.局部变量 文本1, 文本型
.局部变量 文本2, 文本型
.局部变量 计次1, 整数型
.局部变量 文本3, 文本型
.局部变量 文本4, 文本型
.局部变量 文本5, 文本型
.计次循环首 (超级列表框.取表项数 (), 计次)
文本 = 超级列表框.取标题 (计次 - 1, 列索引)
文本1 = 超级列表框.取标题 (计次 - 1, 列索引1)
文本2 = 超级列表框.取标题 (计次 - 1, 列索引2)
.计次循环首 (超级列表框.取表项数 (), 计次1)
文本3 = 超级列表框.取标题 (计次1 - 1, 列索引)
文本4 = 超级列表框.取标题 (计次1 - 1, 列索引1)
文本5 = 超级列表框.取标题 (计次1 - 1, 列索引2)
.如果真 (文本3 = 文本 且 文本4 = 文本1 且 文本5 = 文本2 且 计次 ≠ 计次1)
超级列表框.删除表项 (计次 - 1)
.如果真结束
处理事件 ()
.计次循环尾 ()
处理事件 ()
.计次循环尾 ()
我这个可以多条件决断,不知道是否有什么问题
求你能快着点吗
以列表框为例写的代码: 超级列表框自己修改过来吧再。主要代码写了。测试没问题。
需要我写的一个模块,请加载进程序。
---------------------------------------------------------------
QQ:812465371
-------------------------------------------------------------------------------------------------------------
.版本 2
.子程序 _按钮1_被单击
.局部变量 n, 整数型
.局部变量 m, 整数型
.局部变量 x, 整数型
.局部变量 初始成员, 文本型
.局部变量 待进入的成员, 文本型, , "0"
.局部变量 确定的成员, 文本型, , "0"
.局部变量 y, 整数型
' ------------------------初始化变量
m = 0
初始成员 = “”
' --------------------------------------导出列表框内容,并清空
.计次循环首 (列表框1.取项目数 (), n)
初始成员 = 初始成员 + 列表框1.取项目文本 (n - 1) + “#/##”
.计次循环尾 ()
列表框1.清空 ()
数组清零 (确定的成员)
' -----------------------------------------------准备列表框成员
待进入的成员 = 分割文本 (初始成员, “#/##”, )
' --------------------------------------------对待进入列表框的成员逐一重复性检测
.计次循环首 (取数组成员数 (待进入的成员), m)
.如果真 (数组_是否属于数组成员_文本型 (待进入的成员 [m], 确定的成员) = 假)
加入成员 (确定的成员, 待进入的成员 [m])
.如果真结束
.计次循环尾 ()
.计次循环首 (取数组成员数 (确定的成员), y)
列表框1.加入项目 (确定的成员 [y], )
.计次循环尾 ()