如何超级列表框判断循环过程中再判断有一样的内容的时候插入到编辑框中全部显示

idcqfkj · 发表于 2015-9-9 13:36:52

如何超级列表框判断循环过程中再判断有一样的内容的时候插入到编辑框中全部显示
给个源码例子哈

猥琐小胖子 · 发表于 2015-9-9 13:36:53

idcqfkj 发表于 2015-9-9 13:56
试了下没成功，我的描述有问题，是excel表导入到超级列表框1的过程中，然后进行判断上一个某一个字段的内容 ...

子程序名	返回值类型	公开	备注
子程序1

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

计次循环首 (超级列表框1.取表项数 (), i)

如果真 (超级列表框1.取标题 (i － 1, 0) ＝ “excel那边的数据”)

编辑框1.加入文本 (“excel那边的数据” ＋ #换行符 )

跳出循环 ()

计次循环尾 ()

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

猥琐小胖子 · 发表于 2015-9-9 13:38:26

麻烦用下标点符号啦

猥琐小胖子 · 发表于 2015-9-9 13:45:56

子程序名	返回值类型	公开	备注
子程序1

计次循环首 (超级列表框1.取表项数 (), i)

计次循环首 (超级列表框1.取表项数 () － i, ii)

如果真 (超级列表框1.取标题 (i － 1, 0) ＝超级列表框1.取标题 (ii － 1, 0))

' 插入编辑框1

计次循环尾 ()

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

13600798154 · 发表于 2015-9-9 13:49:10

计次循环首 (超级列表框.取表项数 (), i)

a=超级列表框.取标题 (1, i)

如果 (寻找文本 (b,a)=-1)

b=b+a

编辑框1.加入内容（b）

计次循环尾 ()

idcqfkj · 发表于 2015-9-9 13:56:30

试了下没成功，我的描述有问题，是excel表导入到超级列表框1的过程中，然后进行判断上一个某一个字段的内容是不是一样的，如果是一样的就加入到编辑框中。。。。不好意思啊

idcqfkj · 发表于 2015-9-9 14:17:19

猥琐小胖子发表于 2015-9-9 14:01
[e=1].版本 2
.支持库 iext

前面两个一样的可以了最后的两个一样的又不行了。= =！

猥琐小胖子 · 发表于 2015-9-9 14:19:05

idcqfkj 发表于 2015-9-9 14:17
前面两个一样的可以了最后的两个一样的又不行了。= =！

这个流程是，你插入列表框之前，先循环一次列表框有的数据。
如果有一样的就加到编辑框，然后跳出循环。也就是不加了
如果循环完毕都没符合，那就执行加，你在循环外部判断以下
如果真(超级列表框1.取表项数 ()> i)
就插入列表框

idcqfkj · 发表于 2015-9-9 14:27:33

猥琐小胖子发表于 2015-9-9 14:19
这个流程是，你插入列表框之前，先循环一次列表框有的数据。
如果有一样的就加到编辑框，然后跳出循环 ...

这样的话试了下，又会多出一个错误的，顺序是这样的，多了一个错误的，下面两个一样的显示了

猥琐小胖子 · 发表于 2015-9-9 14:30:22

idcqfkj 发表于 2015-9-9 14:27
这样的话试了下，又会多出一个错误的，顺序是这样的，多了一个错误的，下面两个一样的显示了

你这样说也不清楚。判断重复过滤就是这样了。循环一次的流程。
或者你把源码和excel都上传个例子吧

		自动登录	找回密码
密码			注册

[已解决] 如何超级列表框判断循环过程中再判断有一样的内容的时候插入到编辑框中全部显示