判断删除当前表项的问题

千寻Team

求大佬指点下，纳闷了。根据条件判断是否符合，符合就继续执行下一条命令，不符合的话就删除，好像是索引的问题，删除不正确，我就是想 过滤
不知道为啥 就是不行，按理说索引就是i - 1 啊  就是不行  大佬们指点下

千寻Team

demo.e (5.21 KB, 下载次数: 8)

2018-10-8 16:50 上传

点击文件名下载附件

落枫_rain

建议倒序循环删除,你这个正序删除会导致删后,所有索引会往前-1,所以会导出乱删,甚至数组超出索引的错误。所以倒序删除即可

大司命

如此，这般~



补充内容 (2018-10-15 13:45):

落枫_rain

已解决 demo.e (5.14 KB, 下载次数: 1)

2018-10-8 16:54 上传

点击文件名下载附件

易正易则

小小栗子仅供参考！

Demo.e (3.23 KB, 下载次数: 1)

2018-10-8 16:56 上传

点击文件名下载附件

飞翔软件开发

  

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

启动线程 (&子程序1, , )

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

变量名	类 型	静态	数组	备 注
i	整数型
内容	文本型
ok
s

判断循环首 (s ≥ 0)
ok ＝ 0
计次循环首 (超级列表框1.取表项数 (), i)
内容 ＝ 超级列表框1.取标题 (i － 1, 1)
如果 (到整数 (内容) ＞ 到整数 (编辑框8.内容) 且 到整数 (内容) ＜ 到整数 (编辑框9.内容) ＝ 真)
调试输出 (“符合”)
ok ＝ ok ＋ 1
调试输出 (“不符合”)
超级列表框1.删除表项 (i － 1)

计次循环尾 ()
判断 (ok ＝ 超级列表框1.取表项数 ())
跳出循环 ()



判断循环尾 ()

i支持库列表	支持库注释
EThread	多线程支持库
iext	扩展界面支持库一
spec	特殊功能支持库

.版本 2<br /> .支持库 EThread<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .子程序 _按钮3_被单击<br /> <br /> 启动线程 (&子程序1, , )<br /> <br /> .子程序 子程序1<br /> .局部变量 i, 整数型<br /> .局部变量 内容, 文本型<br /> .局部变量 ok<br /> .局部变量 s<br /> <br /> .判断循环首 (s ≥ 0)<br />     ok ＝ 0<br />     .计次循环首 (超级列表框1.取表项数 (), i)<br />         内容 ＝ 超级列表框1.取标题 (i － 1, 1)<br />         .如果 (到整数 (内容) ＞ 到整数 (编辑框8.内容) 且 到整数 (内容) ＜ 到整数 (编辑框9.内容) ＝ 真)<br />             调试输出 (“符合”)<br />             ok ＝ ok ＋ 1<br />         .否则<br />             调试输出 (“不符合”)<br />             超级列表框1.删除表项 (i － 1)<br />         .如果结束<br /> <br />     .计次循环尾 ()<br />     .判断开始 (ok ＝ 超级列表框1.取表项数 ())<br />         跳出循环 ()<br />     .默认<br /> <br />     .判断结束<br /> <br /> .判断循环尾 ()

夏天吃了春天

很简单的