易语言这个功能怎么写（列表框1中的内容通过按钮加入到列表框2中，但是不能重复加入）

少帅123

易语言这个功能怎么写（选中列表框1中的内容通过按钮加入到列表框2中，加入的时候判断，如果列表框2中没有列表框1当前选中的内容就不加人，如果列表框1当前选中的内容=列表框2中的某一项，那么就不加入）
界面如下图（图1）



联系我时，请说是在 挂海论坛 上看到的，谢谢！

少帅123

我是这样做的
.版本 2

.子程序 _按钮添加_被单击
.局部变量 Q, 整数型
.局部变量 内容, 文本型
.局部变量 逻辑变量, 逻辑型

.如果 (列表框2.取项目数 () ≤ 0)
    .如果真 (列表框1.现行选中项 ≠ -1 且 列表框1.取项目文本 (列表框1.现行选中项) ≠ “”)
        列表框2.加入项目 (列表框1.取项目文本 (列表框1.现行选中项), )
    .如果真结束

.否则
    .计次循环首 (列表框2.取项目数 (), Q)
        内容 ＝ 列表框2.取项目文本 (Q － 1)
        .如果 (内容 ≠ “” 且 内容 ＝ 列表框1.取项目文本 (列表框1.现行选中项))
            逻辑变量 ＝ 真
        .否则
            逻辑变量 ＝ 假
        .如果结束

    .计次循环尾 ()
    .如果真 (逻辑变量 ＝ 假 且 列表框1.现行选中项 ≠ -1)
        列表框2.加入项目 (列表框1.取项目文本 (列表框1.现行选中项), )

    .如果真结束

.如果结束


这样做了以后  有点作用，但是还不是我要的目的，现在列表框1中选中的是0，单机按钮添加就加入到了列表框2中，现在再按添加按钮，那么这个0是不会添加到列表框2中的，但是只要在列表框2中0的下边任意添加一个数后，这个0又能添加了，这不是我要的结果，我想要的结果是，（列表框1中有0到9的数，列表框2中有3,6,9。我想要的是通过添加按钮，在列表框2中只能加入0,1,2,4,5,7,8）

少帅123

{:huffy:}{:huffy:}{:huffy:}{:sad:}{:sad:}{:sad:}{:sad:}{:sad:}{:sad:}{:sad:}

少帅123

自己搞出来了   不用说了    哎。。。。。。。。。。。。。。。。。。

少帅123

.版本 2

.子程序 _按钮1_被单击
.局部变量 Q, 整数型
.局部变量 数组, 文本型, , "0"
.局部变量 关键内容, 文本型

.如果 (列表框2.取项目数 () ≤ 0)
    .如果真 (列表框1.现行选中项 ≠ -1 且 列表框1.取项目文本 (列表框1.现行选中项) ≠ “”)
        列表框2.加入项目 (列表框1.取项目文本 (列表框1.现行选中项), )
    .如果真结束

.否则
    .计次循环首 (列表框2.取项目数 (), Q)
        .如果真 (列表框2.取项目文本 (Q － 1) ≠ “”)
            关键内容 ＝ 列表框2.取项目文本 (Q － 1) ＋ “ ” ＋ 关键内容
        .如果真结束

    .计次循环尾 ()
    .如果真 (列表框1.现行选中项 ≠ -1 且 寻找文本 (关键内容, 列表框1.取项目文本 (列表框1.现行选中项), , 假) ＝ -1)
        列表框2.加入项目 (列表框1.取项目文本 (列表框1.现行选中项), )
    .如果真结束

indulge516

又想学虹哥做假的搜检测圈钱？

2317242273

.版本 2

.子程序 _按钮1_被单击
.局部变量 Q, 整数型
.局部变量 内容, 文本型
.局部变量 计次, 整数型
.局部变量 逻辑变量, 逻辑型
.局部变量 存储, 文本型

存储 ＝ “”
.如果 (列表框2.取项目数 () ≤ 0)
    .如果真 (列表框1.现行选中项 ≠ -1 且 列表框1.取项目文本 (列表框1.现行选中项) ≠ “”)
        列表框2.加入项目 (列表框1.取项目文本 (列表框1.现行选中项), )
    .如果真结束

.否则
    .计次循环首 (列表框2.取项目数 (), Q)
        内容 ＝ 列表框2.取项目文本 (Q － 1)
        .如果 (内容 ≠ “” 且 内容 ＝ 列表框1.取项目文本 (列表框1.现行选中项))
            逻辑变量 ＝ 真
        .否则
            逻辑变量 ＝ 假
        .如果结束

    .计次循环尾 ()
    .如果真 (逻辑变量 ＝ 假 且 列表框1.现行选中项 ≠ -1)
        .计次循环首 (列表框1.取项目数 (), 计次)
            .如果真 (列表框2.取项目文本 (计次 － 1) ≠ “”)
                存储 ＝ 存储 ＋ “;” ＋ 列表框2.取项目文本 (计次 － 1)
            .如果真结束

        .计次循环尾 ()


        .如果真 (寻找文本 (存储, 列表框1.取项目文本 (列表框1.现行选中项), , 假) ＝ -1)
            列表框2.加入项目 (列表框1.取项目文本 (列表框1.现行选中项), )

        .如果真结束

    .如果真结束

.如果结束

2317242273

很简单的用循环取出来内容 然后对比就行 例子发你了

少帅123

leersa123 发表于 2018-12-27 11:05
又想学虹哥做假的搜检测圈钱？

哈哈    我做个天龙 自动转身的 ，刚才那个列表框是选择释放的技能的

indulge516

少帅123 发表于 2018-12-27 11:22
哈哈    我做个天龙 自动转身的 ，刚才那个列表框是选择释放的技能的

那行 兄弟加油 看好你{:撸啊撸:}