超级列表框筛选出指定数据怎么搞？

爱已远去

我现在筛选第2咧，数字范围在2-15，然后最大数是15的一个，然后把结果也就是数据1的填到下面结果编辑框里

zainex

例子：

  

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

变量名	类 型	静态	数组	备 注
数量	整数型
数	整数型
结果	整数型
数值	整数型
筛选位置	整数型
最小筛选	整数型
最大筛选	整数型
改变	逻辑型

组合框1.现行选中项 ＝ 组合框1.现行选中项
数量 ＝ 超级列表框1.取表项数 ()
如果真 (数量 ≤ 0)
调试输出 (“列表框没有内容”)
返回 ()
筛选位置 ＝ 到整数 (编辑框1.内容)
如果真 (筛选位置 ＜ 0 或 筛选位置 ＞ 超级列表框1.取列数 ())
调试输出 (“筛选范围错误”)
返回 ()
最小筛选 ＝ 到整数 (编辑框2.内容)
最大筛选 ＝ 到整数 (编辑框3.内容)
结果 ＝ 最小筛选
计次循环首 (数量, 数)
数值 ＝ 到整数 (超级列表框1.取标题 (数 － 1, 1))
如果真 (数值 ≥ 最小筛选 且 数值 ≤ 最大筛选)
判断 (组合框1.现行选中项 ＝ 0)  ' 如果选中最大
如果真 (结果 ＜ 数值)
改变 ＝ 真
结果 ＝ 数值

如果真 (结果 ＞ 数值)
改变 ＝ 真
结果 ＝ 数值



计次循环尾 ()
调试输出 (结果)
如果 (改变)
编辑框4.内容 ＝ 到文本 (结果)
调试输出 (“筛选不到”)

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

.版本 2<br /> .支持库 iext<br /> .支持库 spec<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 数量, 整数型<br /> .局部变量 数, 整数型<br /> .局部变量 结果, 整数型<br /> .局部变量 数值, 整数型<br /> .局部变量 筛选位置, 整数型<br /> .局部变量 最小筛选, 整数型<br /> .局部变量 最大筛选, 整数型<br /> .局部变量 改变, 逻辑型<br /> <br /> 组合框1.现行选中项 ＝ 组合框1.现行选中项<br /> 数量 ＝ 超级列表框1.取表项数 ()<br /> .如果真 (数量 ≤ 0)<br />     调试输出 (“列表框没有内容”)<br />     返回 ()<br /> .如果真结束<br /> 筛选位置 ＝ 到整数 (编辑框1.内容)<br /> .如果真 (筛选位置 ＜ 0 或 筛选位置 ＞ 超级列表框1.取列数 ())<br />     调试输出 (“筛选范围错误”)<br />     返回 ()<br /> .如果真结束<br /> 最小筛选 ＝ 到整数 (编辑框2.内容)<br /> 最大筛选 ＝ 到整数 (编辑框3.内容)<br /> 结果 ＝ 最小筛选<br /> .计次循环首 (数量, 数)<br />     数值 ＝ 到整数 (超级列表框1.取标题 (数 － 1, 1))<br />     .如果真 (数值 ≥ 最小筛选 且 数值 ≤ 最大筛选)<br />         .判断开始 (组合框1.现行选中项 ＝ 0)  ' 如果选中最大<br />             .如果真 (结果 ＜ 数值)<br />                 改变 ＝ 真<br />                 结果 ＝ 数值<br />             .如果真结束<br /> <br />         .默认<br />             .如果真 (结果 ＞ 数值)<br />                 改变 ＝ 真<br />                 结果 ＝ 数值<br />             .如果真结束<br /> <br />         .判断结束<br /> <br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 调试输出 (结果)<br /> .如果 (改变)<br />     编辑框4.内容 ＝ 到文本 (结果)<br /> .否则<br />     调试输出 (“筛选不到”)

爱已远去

555.e (919.26 KB, 下载次数: 4)

昨天 13:13 上传

点击文件名下载附件

刚刚附件上传了没得，补上

qwert1346

计次循环遍历超级列表框里面的数据，然后降获得的数据与筛选范围做比较，然后符合条件的执行后续操作

Ruang

demo.e (4.55 KB, 下载次数: 3)

昨天 13:31 上传

点击文件名下载附件

山猫啊

555.e (1.07 MB, 下载次数: 2)

昨天 13:41 上传

点击文件名下载附件

看一下是不是需要这样的

爱已远去

各位大佬，我弄好了，谢谢了