超级列表框的问题,求个完美的解决方案.

9970120

大概的意思就是,我想知道与编辑框1时间相同的行有哪些.谢谢


源码放附件里,麻烦各位帮忙看下...



11.e (4.45 KB, 下载次数: 2)

2019-9-29 06:40 上传

点击文件名下载附件

杯中水

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
时间	文本型

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

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

变量名	类 型	静态	数组	备 注
Count	整数型
Set	文本型
N	整数型

时间 ＝ 删全部空 (编辑框1.内容)
计次循环首 (超级列表框1.取表项数 (), Count)
如果真 (超级列表框1.取标题 (Count － 1, 2) ＝ 时间)
N ＝ N ＋ 1
Set ＝ Set ＋ 到文本 (Count) ＋ “行；”

计次循环尾 ()
编辑框2.内容 ＝ 到文本 (N)
编辑框3.内容 ＝ Set
输出调试文本 (超级列表框1.查找表项 (时间, , , 2))

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 时间, 文本型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> <br /> <br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 Count, 整数型<br /> .局部变量 Set, 文本型<br /> .局部变量 N, 整数型<br /> <br /> 时间 ＝ 删全部空 (编辑框1.内容)<br /> <br /> .计次循环首 (超级列表框1.取表项数 (), Count)<br />     .如果真 (超级列表框1.取标题 (Count － 1, 2) ＝ 时间)<br />         N ＝ N ＋ 1<br />         Set ＝ Set ＋ 到文本 (Count) ＋ “行；”<br />     .如果真结束<br /> <br /> .计次循环尾 ()<br /> 编辑框2.内容 ＝ 到文本 (N)<br /> 编辑框3.内容 ＝ Set<br /> 输出调试文本 (超级列表框1.查找表项 (时间, , , 2))

11.e (4.93 KB, 下载次数: 3)

2019-9-29 07:40 上传

点击文件名下载附件

9970120

杯中水 发表于 2019-9-29 07:41
[e=4].版本 2
.支持库 iext

谢谢谢谢