求助一个小功能___超级列表框的内容按要求显示

Mento

[/e]

  

子程序名	返回值类型	公开	备 注
_按钮_只看选中_被单击

如果 (超级列表框2.取标题 (超级列表框2, 3) ≠ 编辑框_卷名.内容)

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

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮_只看选中_被单击<br /> <br /> .如果 (超级列表框2.取标题 (超级列表框2, 3) ≠ 编辑框_卷名.内容)<br /> <br /> .否则<br /> <br /> .如果结束

我想  点击按钮  超级列表框 会根据 编辑框的内容进行筛选 只显示符合要求的

guowei0422

Mento 发表于 2021-4-12 21:45
不行没生效

  

子程序名	返回值类型	公开	备 注
只看选中

变量名	类 型	静态	数组	备 注
i	整数型
局_查找内容	文本型
局_只显示内容	文本型
总行	整数型
索引	双精度小数型

局_只显示内容 ＝ 编辑框_卷名.内容
总行 ＝ 超级列表框_查卷.取表项数 ()
计次循环首 (总行, i)
索引 ＝ 总行 － i
局_查找内容 ＝ 超级列表框_查卷.取标题 (索引, 3)
如果真 (局_只显示内容 ≠ 局_查找内容)
超级列表框_查卷.删除表项 (索引)

计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 只看选中, , , <br /> .局部变量 i, 整数型<br /> .局部变量 局_查找内容, 文本型<br /> .局部变量 局_只显示内容, 文本型<br /> .局部变量 总行, 整数型<br /> .局部变量 索引, 双精度小数型<br /> <br /> 局_只显示内容 ＝ 编辑框_卷名.内容<br /> 总行 ＝ 超级列表框_查卷.取表项数 ()<br /> .计次循环首 (总行, i)<br />     索引 ＝ 总行 － i<br />     局_查找内容 ＝ 超级列表框_查卷.取标题 (索引, 3)<br />     .如果真 (局_只显示内容 ≠ 局_查找内容)<br />         超级列表框_查卷.删除表项 (索引)<br />     .如果真结束<br /> <br /> .计次循环尾 ()

Loserecall

  

变量名	类 型	静态	数组	备 注
被查找内容	文本型

被查找内容 ＝ 编辑框_账号.内容
计次循环首 (超级列表框1.取表项数 (), i)
如果真 (被查找内容 ＝ 超级列表框1.取标题 (i, 3))
信息框 (“找到了”, 0, , )

计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 被查找内容, 文本型<br /> <br /> 被查找内容 ＝ 编辑框_账号.内容<br /> .计次循环首 (超级列表框1.取表项数 (), i)<br />     .如果真 (被查找内容 ＝ 超级列表框1.取标题 (i, 3))<br />         信息框 (“找到了”, 0, , )<br />     .如果真结束<br /> <br /> .计次循环尾 ()

Mento

th4777 发表于 2021-4-10 19:11
[e=0].版本 2
.支持库 iext

要显示到  超级列表框2

Loserecall

  

变量名	类 型	静态	数组	备 注
被查找内容	文本型
找到的内容	文本型
sy	整数型

被查找内容 ＝ 编辑框_账号.内容
计次循环首 (超级列表框1.取表项数 (), i)
找到的内容 ＝ 超级列表框1.取标题 (i, 1)
如果真 (被查找内容 ＝ 找到的内容)
信息框 (“找到了”, 0, , )
sy ＝ 超级列表框2.插入表项 (, , , , , )
超级列表框2.置标题 (sy, 0, 到文本 (i))
超级列表框2.置标题 (sy, 1, 找到的内容)

计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .局部变量 被查找内容, 文本型<br /> .局部变量 找到的内容, 文本型<br /> .局部变量 sy, 整数型<br /> <br /> 被查找内容 ＝ 编辑框_账号.内容<br /> .计次循环首 (超级列表框1.取表项数 (), i)<br />     找到的内容 ＝ 超级列表框1.取标题 (i, 1)<br /> <br />     .如果真 (被查找内容 ＝ 找到的内容)<br />         信息框 (“找到了”, 0, , )<br />         sy ＝ 超级列表框2.插入表项 (, , , , , )<br />         超级列表框2.置标题 (sy, 0, 到文本 (i))<br />         超级列表框2.置标题 (sy, 1, 找到的内容)<br />     .如果真结束<br /> <br /> .计次循环尾 ()

Mento

th4777 发表于 2021-4-10 19:31
[e=0].版本 2
.支持库 iext

老师你好，我之前表格还有内容的。清空表格之后是不是要再调取一次？

Mento

th4777 发表于 2021-4-10 19:31
[e=0].版本 2
.支持库 iext

.版本 2
.支持库 iext

.子程序 _按钮_只看选中_被单击
.局部变量 局_只要内容, 文本型
.局部变量 i, 整数型
.局部变量 局_查找内容, 文本型

局_只显示内容 ＝ 编辑框_卷名.内容
.计次循环首 (超级列表框2.取标题 (超级列表框2, 3), i)
    局_查找内容 ＝ 超级列表框1.取标题 (i, 1)
    .如果 (局_查找内容 = 局_只显示内容)
        超级列表框2.全部删除 ()
        超级列表框2.置标题 (, , )
    .否则

    .如果结束

.计次循环尾 ()

Mento

  

子程序名	返回值类型	公开	备 注
_按钮_只看选中_被单击

变量名	类 型	静态	数组	备 注
局_只要内容	文本型
i	整数型
局_查找内容	文本型

局_只显示内容 ＝ 编辑框_卷名.内容
计次循环首 (超级列表框2.取标题 (超级列表框2, 3), i)
局_查找内容 ＝ 超级列表框1.取标题 (i, 1)
如果 (局_查找内容 = 局_只显示内容)
超级列表框2.全部删除 ()
超级列表框2.置标题 (, , )



计次循环尾 ()

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

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮_只看选中_被单击<br /> .局部变量 局_只要内容, 文本型<br /> .局部变量 i, 整数型<br /> .局部变量 局_查找内容, 文本型<br /> <br /> 局_只显示内容 ＝ 编辑框_卷名.内容<br /> .计次循环首 (超级列表框2.取标题 (超级列表框2, 3), i)<br />     局_查找内容 ＝ 超级列表框1.取标题 (i, 1)<br />     .如果 (局_查找内容 = 局_只显示内容)<br />         超级列表框2.全部删除 ()<br />         超级列表框2.置标题 (, , )<br />     .否则<br /> <br />     .如果结束<br /> <br /> .计次循环尾 ()

现在是这个样子了

Loserecall

Mento 发表于 2021-4-10 19:38
.版本 2
.支持库 iext

你是说列表2有内容嘛 插入之前清空一下可以 自己测试一下 不行我在给你改一下

补充内容 (2021-4-10 19:49):
超级列表框2.全部删除()

补充内容 (2021-4-10 19:50):
下边加上 超级列表框2.允许重画()

Mento

th4777 发表于 2021-4-10 19:49
你是说列表2有内容嘛 插入之前清空一下可以 自己测试一下 不行我在给你改一下

补充内容 (2021-4-10 19:4 ...

没生效- -不知道为什么，，，