求搜索购物列表框项目标题思路！

zssm

求一段  搜索购物列表框 项目标题的源码！   

例如 “
我在编辑框1内输入了关键词   点击按钮1  则  搜索  购物列表框内的项目标题！  找到了就跳转到对应项目索引 ！  没找到就弹出提示

dwdaddy

简单东西  希望可以帮到你


事件 按钮1.被单击()
        变量 位置 为 整数型
        变量 左边 为 整数型
        变量 右边 为 整数型
        变量 中间 为 文本型
        变量 i 为 整数型 = 0  '《注意：因为字符第一个位置是 0 ,所以循环用的变量为 0 才可以循环到第一个字符》
        表格1.清空表格()      '防止重复添加,把表格清空
        编辑框3.内容 = ""     '防止重复添加,把内容清空     
        位置 = 寻找文本(编辑框1.内容,编辑框2.内容,0)       ' 找到字符的位置数字,不是文本
        
        判断循环首 i < 4   ' 循环四次
                左边 = 倒找文本(编辑框1.内容,"，",位置) ' 找到字符左边的代号,也就是设置的中文逗号："，",
                右边 = 寻找文本(编辑框1.内容,"，",左边 + 1)         '这里第三个参数：左边不 "+ 1" 输出后会把第一个字符也就是为 0 的变成 -1,把 1 变成 0 ,以此类推
                中间 = 取文本中间(编辑框1.内容,左边 + 1,右边  - 左边 - 1)  '第二个参数：左边 "+ 1 " 是因为右边左边是一个逗号,加1就可以跳过逗号,从文本开始
                '↑↑第三个参数：把 右边 - 左边 得到比左右中间的的字符还要多一位,所以再 "减 1"
                '↑↑第三个参数不加不减会在右边多一个记号,也就是设置的中文逗号："，"
                表格1.添加单元格(中间,9,黑色,白色)
                编辑框3.加入文本(中间 & "\n")
                编辑框3.加入文本(中间 & "    左边：" &到文本(左边) & "   右边：" &到文本(右边) & "\n")
                位置 = 右边      '在找到的 "右边" 重新位置贬值给 "左边",在新的位置继续往后面循环查找
                i=i+1
        判断循环尾
        '要是看不懂请去把基础学好一点
       
        '查找列表框之类的有索引的就简单多一点,
    变量 i1 为 整数型
        变量 组件对象 为 文本型
    判断循环首 i1 < 组件对象.取项目数()  '想取什么请自行改变
        变量 索引 为 文本型   '《 类型 请根据组件属性去改变,这里就假设设置为文本型》
        索引 = 组件对象.组件属性(索引)
        如果 寻找文本(索引,你搜索的内容,0) <> -1 则
                编辑框1.加入文本(索引)  '《输出方法请自行改变》
        结束 如果
        i1 = i1 + 1
    判断循环尾
结束 事件

zh2650307

你是个板凳B，肯定不会啊。。。。。。。。。。。。。。。。。。。。。

zssm

zh2650307 发表于 2019-11-28 19:49
你是个板凳B，肯定不会啊。。。。。。。。。。。。。。。。。。。。。

不知道你为啥怼我！ 最看不起的就是有点技术就门缝看人的人！  我虚心请教！你这样回复！真让人看不起！

haiai8532

循环取标题就好了

zssm

haiai8532 发表于 2019-11-28 21:20
循环取标题就好了

求循环的思路

zssm

haiai8532 发表于 2019-11-28 21:20
循环取标题就好了

判断项目索引这段一直没弄明白

风风风

判断循环+寻找文本

风风风

如果做搜索的话，这样的有点板，得到内置关键词

zssm

风风风 发表于 2019-11-28 23:13
如果做搜索的话，这样的有点板，得到内置关键词

事先录入每个关键词这个思路我也想过！但是有缺点！一旦关键词太多就会很占代码