树形框搜索项目文本,字节集搜搜

易语言 2020-07-06 17:02:22

.子程序 树形框_搜索项目文本_支持库, 整数型, , 搜索成功返回文本所在的项目数,否则返回-1
.参数 树型框, 树型框
.参数 欲查找内容, 文本型
.参数 模糊搜索, 逻辑型, 可空
.局部变量 搜索结果, 逻辑型
.局部变量 i, 整数型
.局部变量 txt, 文本型
.局部变量 项目数, 整数型

搜索结果 = 假
.如果真 (是否为空 (模糊搜索))
模糊搜索 = 真
.如果真结束
项目数 = -1
.计次循环首 (树型框1.取项目数 (), i)
项目数 = 项目数 + 1
txt = 树型框1.取项目文本 (i - 1)
.如果 (模糊搜索)
.如果真 (寻找文本 (txt, 欲查找内容, , 假) ≠ -1)
搜索结果 = 真
跳出循环 ()
.如果真结束

.否则
.如果真 (txt = 欲查找内容)
搜索结果 = 真
跳出循环 ()
.如果真结束

.如果结束

.计次循环尾 ()
.判断开始 (搜索结果)
返回 (项目数)
.默认
返回 (-1)