超级列表框表项关键词查找功能

.计次循环首 (超级列表框.取表项数 (), a)
索引 ＝ a － 1
.如果真 (表项关键字搜索 (超级列表框, 索引, 0, 临时文本) ＝ 真) ' 只是搜索了第1列,需要的话可以通过循环每项每列读取
是否找到 ＝ 真
跳出循环 ()
.如果真结束

.计次循环尾 ()
.如果真 (是否找到 ＝ 假) ' 全部搜索没找到 弹出信息框
索引 ＝ 0
信息框 (“超级列表框中没找到” ＋ #换行符 ＋ #换行符 ＋ 临时文本, 0, “”)