易语言,组合框.加入项目,如何判断要加入的内容已经存在,如果已经存在就不加入,不存在就加入????
展开全部
下面我个人写的一个列表框去重复项目的源码,你可以直接复制到易语言查看学习,自己修改:
类似的功能性推荐你自己写成模块,方便用时直接调用。
-----------------------------------------------------------------------------
.版本 2
.子程序 afl_列表框去重复项目, , 公开
.参数 去重的列表框, 列表框
.局部变量 n, 整数型
.局部变量 m, 整数型
.局部变量 x, 整数型
.局部变量 初始成员, 文本型
.局部变量 待进入的成员, 文本型, , "0"
.局部变量 确定的成员, 文本型, , "0"
.局部变量 y, 整数型
' ------------------------初始化变量
m = 0
初始成员 = “”
' --------------------------------------导出列表框内容,并清空
.计次循环首 (去重的列表框.取项目数 (), n)
初始成员 = 初始成员 + 去重的列表框.取项目文本 (n - 1) + “#/##”
.计次循环尾 ()
去重的列表框.清空 ()
数组清零 (确定的成员)
' -----------------------------------------------准备列表框成员
待进入的成员 = 分割文本 (初始成员, “#/##”, )
' --------------------------------------------对待进入列表框的成员逐一重复性检测
.计次循环首 (取数组成员数 (待进入的成员), m)
.如果真 (数组_是否属于数组成员_文本型 (待进入的成员 [m], 确定的成员) = 假)
加入成员 (确定的成员, 待进入的成员 [m])
.如果真结束
.计次循环尾 ()
.计次循环首 (取数组成员数 (确定的成员), y)
去重的列表框.加入项目 (确定的成员 [y], )
.计次循环尾 ()
类似的功能性推荐你自己写成模块,方便用时直接调用。
-----------------------------------------------------------------------------
.版本 2
.子程序 afl_列表框去重复项目, , 公开
.参数 去重的列表框, 列表框
.局部变量 n, 整数型
.局部变量 m, 整数型
.局部变量 x, 整数型
.局部变量 初始成员, 文本型
.局部变量 待进入的成员, 文本型, , "0"
.局部变量 确定的成员, 文本型, , "0"
.局部变量 y, 整数型
' ------------------------初始化变量
m = 0
初始成员 = “”
' --------------------------------------导出列表框内容,并清空
.计次循环首 (去重的列表框.取项目数 (), n)
初始成员 = 初始成员 + 去重的列表框.取项目文本 (n - 1) + “#/##”
.计次循环尾 ()
去重的列表框.清空 ()
数组清零 (确定的成员)
' -----------------------------------------------准备列表框成员
待进入的成员 = 分割文本 (初始成员, “#/##”, )
' --------------------------------------------对待进入列表框的成员逐一重复性检测
.计次循环首 (取数组成员数 (待进入的成员), m)
.如果真 (数组_是否属于数组成员_文本型 (待进入的成员 [m], 确定的成员) = 假)
加入成员 (确定的成员, 待进入的成员 [m])
.如果真结束
.计次循环尾 ()
.计次循环首 (取数组成员数 (确定的成员), y)
去重的列表框.加入项目 (确定的成员 [y], )
.计次循环尾 ()
追问
我是新手,你这个太复杂了,理解不了,
追答
哦,理解不了算了。本人从不写源码
本回答被提问者和网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询