筛选超级列表框内的数据

shikong

通过两个日期框筛选出超级列表框内的所有数据并且整行展示

zainex

把要显示的内容事先保存起来，每次要更新的时候，重新显示：

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
数组	字节集	0

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
时间	日期时间型
索引	整数型
新时间	日期时间型
内容	字节集
数	整数型
成员	文本型		2
值	整数型

时间 ＝ 取现行时间 ()
计次循环首 (10, 数)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
新时间 ＝ 增减时间 (时间, #秒, 选择 (取随机数 (0, 1) ＝ 0, 1, -1) × 取随机数 (100000, 200000))
成员 [1] ＝ 格式化文本 (“No.%d”, 数)
成员 [2] ＝ 格式化文本 (“%d-%.2d-%.2d %.2d:%.2d:%.2d”, 取年份 (新时间), 取月份 (新时间), 取日 (新时间), 取小时 (新时间), 取分钟 (新时间), 取秒 (新时间))
内容 ＝ {  }
计次循环首 (取数组成员数 (成员), 值)
内容 ＝ 内容 ＋ 到字节集 (成员 [值]) ＋ { 0 }
计次循环尾 ()
加入成员 (数组, 内容)
超级列表框1.置标题 (索引, 0, 成员 [1])
超级列表框1.置标题 (索引, 1, 成员 [2])
计次循环尾 ()
' 调试输出 (数组)

子程序名	返回值类型	公开	备 注
_日期框1_选择日期被改变

更新内容 (日期框1.今天, 日期框2.今天)

子程序名	返回值类型	公开	备 注
_日期框2_选择日期被改变

更新内容 (日期框1.今天, 日期框2.今天)

子程序名	返回值类型	公开	备 注
更新内容
参数名	类 型	参考	可空	数组	备 注
起始时间	日期时间型
结束时间	日期时间型

变量名	类 型	静态	数组	备 注
数	整数型
内容	字节集
成员	字节集		0
当前时间	日期时间型
索引	整数型

超级列表框1.全部删除 ()
起始时间 ＝ 到时间 (格式化文本 (“%d-%d-%d”, 取年份 (起始时间), 取月份 (起始时间), 取日 (起始时间)))
结束时间 ＝ 到时间 (格式化文本 (“%d-%d-%d”, 取年份 (结束时间), 取月份 (结束时间), 取日 (结束时间)))
如果真 (起始时间 ＞ 结束时间)
交换变量 (起始时间, 结束时间)
计次循环首 (取数组成员数 (数组), 数)
成员 ＝ 分割字节集 (数组 [数], { 0 }, )
当前时间 ＝ 到时间 (到文本 (成员 [2]))
如果真 (当前时间 ≥ 起始时间 且 当前时间 ≤ 结束时间)
索引 ＝ 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (成员 [1]))
超级列表框1.置标题 (索引, 1, 到文本 (成员 [2]))

计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一
eAPI	应用接口支持库

.版本 2<br /> .支持库 iext<br /> .支持库 eAPI<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 数组, 字节集, , "0"<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 时间, 日期时间型<br /> .局部变量 索引, 整数型<br /> .局部变量 新时间, 日期时间型<br /> .局部变量 内容, 字节集<br /> .局部变量 数, 整数型<br /> .局部变量 成员, 文本型, , "2"<br /> .局部变量 值, 整数型<br /> <br /> 时间 ＝ 取现行时间 ()<br /> .计次循环首 (10, 数)<br />     索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />     新时间 ＝ 增减时间 (时间, #秒, 选择 (取随机数 (0, 1) ＝ 0, 1, -1) × 取随机数 (100000, 200000))<br />     成员 [1] ＝ 格式化文本 (“No.%d”, 数)<br />     成员 [2] ＝ 格式化文本 (“%d-%.2d-%.2d %.2d:%.2d:%.2d”, 取年份 (新时间), 取月份 (新时间), 取日 (新时间), 取小时 (新时间), 取分钟 (新时间), 取秒 (新时间))<br />     内容 ＝ {  }<br />     .计次循环首 (取数组成员数 (成员), 值)<br />         内容 ＝ 内容 ＋ 到字节集 (成员 [值]) ＋ { 0 }<br />     .计次循环尾 ()<br />     加入成员 (数组, 内容)<br />     超级列表框1.置标题 (索引, 0, 成员 [1])<br />     超级列表框1.置标题 (索引, 1, 成员 [2])<br /> .计次循环尾 ()<br /> ' 调试输出 (数组)<br /> <br /> <br /> .子程序 _日期框1_选择日期被改变<br /> <br /> 更新内容 (日期框1.今天, 日期框2.今天)<br /> <br /> <br /> .子程序 _日期框2_选择日期被改变<br /> <br /> 更新内容 (日期框1.今天, 日期框2.今天)<br /> <br /> <br /> .子程序 更新内容<br /> .参数 起始时间, 日期时间型<br /> .参数 结束时间, 日期时间型<br /> .局部变量 数, 整数型<br /> .局部变量 内容, 字节集<br /> .局部变量 成员, 字节集, , "0"<br /> .局部变量 当前时间, 日期时间型<br /> .局部变量 索引, 整数型<br /> <br /> 超级列表框1.全部删除 ()<br /> 起始时间 ＝ 到时间 (格式化文本 (“%d-%d-%d”, 取年份 (起始时间), 取月份 (起始时间), 取日 (起始时间)))<br /> 结束时间 ＝ 到时间 (格式化文本 (“%d-%d-%d”, 取年份 (结束时间), 取月份 (结束时间), 取日 (结束时间)))<br /> .如果真 (起始时间 ＞ 结束时间)<br />     交换变量 (起始时间, 结束时间)<br /> .如果真结束<br /> .计次循环首 (取数组成员数 (数组), 数)<br />     成员 ＝ 分割字节集 (数组 [数], { 0 }, )<br />     当前时间 ＝ 到时间 (到文本 (成员 [2]))<br />     .如果真 (当前时间 ≥ 起始时间 且 当前时间 ≤ 结束时间)<br />         索引 ＝ 超级列表框1.插入表项 (, , , , , )<br />         超级列表框1.置标题 (索引, 0, 到文本 (成员 [1]))<br />         超级列表框1.置标题 (索引, 1, 到文本 (成员 [2]))<br />     .如果真结束<br /> <br /> .计次循环尾 ()

效果：

完整例子.zip (2.29 KB, 下载次数: 3)

2025-7-16 17:23 上传

点击文件名下载附件

圆圈

两个日期框是啥意思，把列表框里的日期显示在日期框组件里？

精易论坛龙

通过计时时间差，来确定时间是否在规定时间区域里面就可以。

kvx55c

判断时间不就行了，符合的把所有列添加分割符加入数组，再分割显示到列表框