超级列表框如何晒选数据

gyqgxj

见图，
5条数据，点击是之后，只想保留第一条。
.版本 2
.支持库 iext

.子程序 _删除超级列表框的不符合数据
.局部变量 面数量, 文本型
.局部变量 有多少行, 整数型
.局部变量 时间2, 日期时间型
.局部变量 循环次数, 整数型
.局部变量 位置索引, 整数型

时间2 ＝ 取现行时间 ()
有多少行 ＝ 超级列表框_数据.取表项数 ()

位置索引 ＝ 超级列表框_数据.查找表项 (超级列表框_已选面.取标题 (0, 1), , , 0)
提示 (到文本 (位置索引))


.计次循环首 (有多少行, 循环次数)
    面数量 ＝ “”
    面数量 ＝ 超级列表框_数据.取标题 (循环次数 － 1, 5)
    .如果 (面数量 ＝ 超级列表框_已选面.取标题 (0, 1))
        提示 (“面数量符合” ＋ 面数量 ＋ “=” ＋ 超级列表框_已选面.取标题 (0, 1))
    .否则
        超级列表框_数据.删除表项 (0)

    .如果结束
    提示 (到文本 (循环次数 － 1) ＋ “面数量符合” ＋ 面数量 ＋ 超级列表框_已选面.取标题 (0, 1))
.计次循环尾 ()

LEOONL

  

子程序名	返回值类型	公开	备 注
_删除超级列表框的不符合数据

变量名	类 型	静态	数组	备 注
面数量	文本型
有多少行	整数型
时间2	日期时间型
循环次数	整数型
位置索引	整数型

时间2 ＝ 取现行时间 ()
有多少行 ＝ 超级列表框_数据.取表项数 ()
位置索引 ＝ 超级列表框_数据.查找表项 (超级列表框_已选面.取标题 (0, 1), , , 0)
提示 (到文本 (位置索引))
计次循环首 (有多少行, 循环次数)
面数量 ＝ “”
面数量 ＝ 超级列表框_数据.取标题 (有多少行-循环次数, 5)
如果 (面数量 ＝ 超级列表框_已选面.取标题 (0, 1))
提示 (“面数量符合” ＋ 面数量 ＋ “=” ＋ 超级列表框_已选面.取标题 (0, 1))
超级列表框_数据.删除表项 (有多少行-循环次数)
提示 (到文本 (循环次数 － 1) ＋ “面数量符合” ＋ 面数量 ＋ 超级列表框_已选面.取标题 (0, 1))
计次循环尾 ()

.版本 2<br /> <br /> .子程序 _删除超级列表框的不符合数据<br /> .局部变量 面数量, 文本型<br /> .局部变量 有多少行, 整数型<br /> .局部变量 时间2, 日期时间型<br /> .局部变量 循环次数, 整数型<br /> .局部变量 位置索引, 整数型<br /> <br /> 时间2 ＝ 取现行时间 ()<br /> 有多少行 ＝ 超级列表框_数据.取表项数 ()<br /> <br /> 位置索引 ＝ 超级列表框_数据.查找表项 (超级列表框_已选面.取标题 (0, 1), , , 0)<br /> 提示 (到文本 (位置索引))<br /> <br /> .计次循环首 (有多少行, 循环次数)<br />     面数量 ＝ “”<br />     面数量 ＝ 超级列表框_数据.取标题 (有多少行-循环次数, 5)<br />     .如果 (面数量 ＝ 超级列表框_已选面.取标题 (0, 1))<br />         提示 (“面数量符合” ＋ 面数量 ＋ “=” ＋ 超级列表框_已选面.取标题 (0, 1))<br />     .否则<br />         超级列表框_数据.删除表项 (有多少行-循环次数)<br />     .如果结束<br />     提示 (到文本 (循环次数 － 1) ＋ “面数量符合” ＋ 面数量 ＋ 超级列表框_已选面.取标题 (0, 1))<br /> .计次循环尾 ()

csc123

最好是做两个超级列表框,一个是做全部数据的,一个是做筛选的,全部数据的可以隐藏,做筛选的读全部数据的即可

csc123

看下是否合适

～夜雨

你这是哪个皮肤，看起来挺清爽的