如下图，我们点击左边一个选择框账号，需要自动加入右边超级列表框，取消选中，则不加入，实现的思路就是，我们先声明一个账号数组，选中选择框，就把这个账号加入数组，取消选中，则从数组里删除。
选择框被单击事件
.版本 2.子程序 _选择框_人在他乡_被单击.如果真 (选择框_人在他乡.选中 ＝ 真)加入成员 (account, “rztx”)账号加入列表框 ().如果真结束.如果真 (选择框_人在他乡.选中 ＝ 假)删除数组成员 (“rztx”)账号加入列表框 ()
删除数组账号成员
.版本 2.子程序 删除数组成员.参数 参_name, 文本型.局部变量 i, 整数型.局部变量 n, 整数型' 删除数组里面指定的成员i ＝ 取数组成员数 (account)n ＝ 1.判断循环首 (i ≥ n).如果 (account [n] ＝ 参_name)删除成员 (account, n, )i ＝ 取数组成员数 (account)n ＝ 1.否则.如果结束n ＝ n ＋ 1.判断循环尾 ()
把账号加入超级列表框
.版本 2.支持库 iext.子程序 账号加入列表框, , , 把选中的账号加入到列表框里.局部变量 i, 整数型.局部变量 m, 整数型超级列表框1.全部删除 ()' 去除数组重复的成员.计次循环首 (取数组成员数 (account), i).如果真 (i ＞ 取数组成员数 (account))跳出循环 ().如果真结束.计次循环首 (取数组成员数 (account) － i, )m ＝ m ＋ 1.如果真 (account [i] ＝ account [i ＋ m])删除成员 (account, i ＋ m, )m ＝ m － 1.如果真结束.如果真 (i ＋ m ＝ 取数组成员数 (account))m ＝ 0跳出循环 ().如果真结束.计次循环尾 ().计次循环尾 ()' 把账号加入超级列表框.计次循环首 (取数组成员数 (account), i)超级列表框1.插入表项 (1, account [i], , , , ).计次循环尾 ()
源码:易语言大漠《剑侠情缘》多线程批量登录选择框数组加入删除账号
511遇见易语言大漠多线程系列免费视频教程
