搜索超级列表框

如明境

怎么利用编辑框搜索列表框里面的文本或者数值，并在列表框显示出来
我的代码搜索列表框第一个可以正常显示，搜索其他的都显示为空

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

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

变量名	类 型	静态	数组	备 注
数组	文本型
json	类_json
i	整数型

数组 ＝ 到文本 (读入文件 (“E:\列表.txt”))
json.解析 (数组)
计次循环首 (json.成员数 (“mems”), i)
列表框1.加入项目 (json.取通用属性 (“mems[” ＋ 到文本 (i － 1) ＋ “].nick”), 到整数 (json.取通用属性 (“mems[” ＋ 到文本 (i － 1) ＋ “].uin”)))
计次循环尾 ()

子程序名	返回值类型	公开	备 注
_编辑框1_内容被改变

变量名	类 型	静态	数组	备 注
列表	文本型
json	类_json
y	整数型

列表框1.清空 ()
列表 ＝ 到文本 (读入文件 (“E:\列表.txt”))
json.解析 (列表)
计次循环首 (json.成员数 (“mems”), y)
判断 (寻找文本 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].nick”), 编辑框1.内容, , 假) ＞ 0 或 寻找文本 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].uin”), 编辑框1.内容, , 假) ＞ 0)
列表框1.加入项目 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].nick”), 到整数 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].uin”)))
判断 (编辑框1.内容 ＝ “”)
__启动窗口_创建完毕 ()
跳出循环 ()

计次循环尾 ()

.版本 2<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 数组, 文本型<br /> .局部变量 json, 类_json<br /> .局部变量 i, 整数型<br /> <br /> 数组 ＝ 到文本 (读入文件 (“E:\列表.txt”))<br /> json.解析 (数组)<br /> .计次循环首 (json.成员数 (“mems”), i)<br />     列表框1.加入项目 (json.取通用属性 (“mems[” ＋ 到文本 (i － 1) ＋ “].nick”), 到整数 (json.取通用属性 (“mems[” ＋ 到文本 (i － 1) ＋ “].uin”)))<br /> .计次循环尾 ()<br /> <br /> .子程序 _编辑框1_内容被改变<br /> .局部变量 列表, 文本型<br /> .局部变量 json, 类_json<br /> .局部变量 y, 整数型<br /> <br /> 列表框1.清空 ()<br /> 列表 ＝ 到文本 (读入文件 (“E:\列表.txt”))<br /> json.解析 (列表)<br /> .计次循环首 (json.成员数 (“mems”), y)<br />     .判断开始 (寻找文本 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].nick”), 编辑框1.内容, , 假) ＞ 0 或 寻找文本 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].uin”), 编辑框1.内容, , 假) ＞ 0)<br />         列表框1.加入项目 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].nick”), 到整数 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].uin”)))<br />     .判断 (编辑框1.内容 ＝ “”)<br />         __启动窗口_创建完毕 ()<br />     .默认<br />         跳出循环 ()<br />     .判断结束<br /> <br /> .计次循环尾 ()

afu45

  

子程序名	返回值类型	公开	备 注
_编辑框1_内容被改变

变量名	类 型	静态	数组	备 注
列表	文本型
json	类_json
y	整数型

列表框1.清空 ()
如果真 (编辑框1.内容 ＝ “”)
__启动窗口_创建完毕 ()
返回 ()

列表 ＝ 到文本 (读入文件 (“E:\列表.txt”))
json.解析 (列表)
计次循环首 (json.成员数 (“mems”), y)
判断 (寻找文本 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].nick”), 编辑框1.内容, , 假) ＞ 0 或 寻找文本 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].uin”), 编辑框1.内容, , 假) ＞ 0)
列表框1.加入项目 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].nick”), 到整数 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].uin”)))



计次循环尾 ()

.版本 2<br /> <br /> .子程序 _编辑框1_内容被改变<br /> .局部变量 列表, 文本型<br /> .局部变量 json, 类_json<br /> .局部变量 y, 整数型<br /> <br /> 列表框1.清空 ()<br /> .如果真 (编辑框1.内容 ＝ “”)<br />     __启动窗口_创建完毕 ()<br />     返回 ()<br /> .如果真结束<br /> <br /> 列表 ＝ 到文本 (读入文件 (“E:\列表.txt”))<br /> json.解析 (列表)<br /> .计次循环首 (json.成员数 (“mems”), y)<br />     .判断开始 (寻找文本 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].nick”), 编辑框1.内容, , 假) ＞ 0 或 寻找文本 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].uin”), 编辑框1.内容, , 假) ＞ 0)<br />         列表框1.加入项目 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].nick”), 到整数 (json.取通用属性 (“mems[” ＋ 到文本 (y － 1) ＋ “].uin”)))<br />     .默认<br /> <br />     .判断结束<br /> <br /> .计次循环尾 ()

Siempre

看着没问题 不知道你说的不显示是什么情况下的不显示

afu45

' 跳出循环 ()  去掉

xbwdl

精美EXUI获取天气预报2.0源码分享_精易论坛 (125.la)
看我的帖子源码里应该有你要功能

如明境

afu45 发表于 2022-8-9 11:00
[e=0].版本 2

.子程序 _编辑框1_内容被改变

谢谢，解决了