求助一个关于超级列表框的问题

郭枫

假如 超级列表框随机1w整数  如何只保留不重复的整数呢 求不用模块

御风软件

郭枫 发表于 2015-1-5 14:45
[e=0].版本 2
.支持库 iext

你先取出1w不重复的整数，是存到数组里面，然后加入到列表框不就好了

那里有你写的这么麻烦，我完全看不懂你写的东西

御风软件

精易模块，文本_取出N组不重复数字 ()，你不要模块，自己把这个命令的源码扣下来就可以了，模块是开源的

郭枫

御风软件 发表于 2015-1-5 14:36
精易模块，文本_取出N组不重复数字 ()，你不要模块，自己把这个命令的源码扣下来就可以了，模块是开源的

  

窗口程序集名	保 留	保 留	备 注
窗口程序集1

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
表项数	整数型
i	整数型

计次循环首 (100, i)
表项数 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项数, 0, 到文本 (i))
计次循环尾 ()
计次循环首 (100, i)
表项数 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项数, 0, 到文本 (i))
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
i	整数型
j	整数型
k
数组	整数型		0
表项	整数型

计次循环首 (超级列表框1.取表项数 (), i)
计次循环首 (超级列表框1.取表项数 () ＋ i, j)
j ＝ j ＋ i
如果真 (超级列表框1.取标题 (i, 0) ＝ 超级列表框1.取标题 (j, 0))
跳出循环 ()

计次循环尾 ()
加入成员 (数组, 到整数 (超级列表框1.取标题 (i, 0)))
计次循环尾 ()
超级列表框1.全部删除 ()
计次循环首 (取数组成员数 (数组), i)
表项 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (表项, 0, 到文本 (数组 [i]))
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集1<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 表项数, 整数型<br /> .局部变量 i, 整数型<br /> <br /> .计次循环首 (100, i)<br /> 表项数 ＝ 超级列表框1.插入表项 (, , , , , )<br /> 超级列表框1.置标题 (表项数, 0, 到文本 (i))<br /> .计次循环尾 ()<br /> .计次循环首 (100, i)<br /> 表项数 ＝ 超级列表框1.插入表项 (, , , , , )<br /> 超级列表框1.置标题 (表项数, 0, 到文本 (i))<br /> .计次循环尾 ()<br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 i, 整数型<br /> .局部变量 j, 整数型<br /> .局部变量 k<br /> .局部变量 数组, 整数型, , "0"<br /> .局部变量 表项, 整数型<br /> <br /> .计次循环首 (超级列表框1.取表项数 (), i)<br /> .计次循环首 (超级列表框1.取表项数 () ＋ i, j)<br /> j ＝ j ＋ i<br /> .如果真 (超级列表框1.取标题 (i, 0) ＝ 超级列表框1.取标题 (j, 0))<br /> 跳出循环 ()<br /> .如果真结束<br /> <br /> .计次循环尾 ()<br /> 加入成员 (数组, 到整数 (超级列表框1.取标题 (i, 0)))<br /> .计次循环尾 ()<br /> 超级列表框1.全部删除 ()<br /> .计次循环首 (取数组成员数 (数组), i)<br /> 表项 ＝ 超级列表框1.插入表项 (, , , , , )<br /> 超级列表框1.置标题 (表项, 0, 到文本 (数组 <i>))<br /> .计次循环尾 ()

我刚刚写出来了 老是出错 不知道什么地方错啦 求大神看看什么地方错啦

郭枫

御风软件 发表于 2015-1-5 14:54
你先取出1w不重复的整数，是存到数组里面，然后加入到列表框不就好了

那里有你写的这么麻烦，我完全看 ...

我做的是两种去重复 一种是列表框内的 一种是列表框外也就是数组的

郭枫

御风软件 发表于 2015-1-5 14:54
你先取出1w不重复的整数，是存到数组里面，然后加入到列表框不就好了

那里有你写的这么麻烦，我完全看 ...

问题已经解决   列表框是从0开始的  忘记-1啦