超级列表框表项内容过滤提取和删除

这个例子写了半天修修改改的终于搞定!

.计次循环首 (超级列表框1.取表项数 (), 判断计次)
.如果 (单选框1.选中 ＝ 真)
.如果真 (寻找文本 (超级列表框1.取标题 (判断计次 － 1 － 已删个数, 1), 编辑框1.内容, , 假) ≠ -1) ' 这里就开始判断了哈!!取得标题,含有关键字
超级列表框1.删除表项 (判断计次 － 1 － 已删个数) ' 那么就删除该表项!
已删个数 ＝ 已删个数 ＋ 1
.如果真结束

.否则
.如果 (单选框2.选中 ＝ 真)
.如果真 (寻找文本 (超级列表框1.取标题 (判断计次 － 1 － 已删个数, 1), 编辑框1.内容, , 假) ＝ -1) ' 这里开始判断,取得标题,没有含关键字
超级列表框1.删除表项 (判断计次 － 1 － 已删个数) ' 那么就删了!
已删个数 ＝ 已删个数 ＋ 1
.如果真结束

.否则
.如果真 (单选框1.选中 ＝ 假 且 单选框2.选中 ＝ 假)
信息框 (“亲,,选择个方案呗~~~” ＋ #换行符 ＋ “你是要删除含有关键字的 还是留下含有关键字的呢??”, 64, )
跳出循环 () ' 这个得加上哈,要不然弹600个信息框,,,哈哈~!
.如果真结束

.如果结束

.如果结束

.计次循环尾 ()
_超级列表框1_表头被单击 (0) ' 如果不想把原位置的序号改变的话,这句代码就不要,这句加上就代表重新排序!!!