求搜索购物列表框项目标题思路!
求一段搜索购物列表框 项目标题的源码!例如 “
我在编辑框1内输入了关键词 点击按钮1则搜索购物列表框内的项目标题!找到了就跳转到对应项目索引 !没找到就弹出提示
简单东西希望可以帮到你
事件 按钮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
判断循环尾
结束 事件 你是个板凳B,肯定不会啊。。。。。。。。。。。。。。。。。。。。。 zh2650307 发表于 2019-11-28 19:49
你是个板凳B,肯定不会啊。。。。。。。。。。。。。。。。。。。。。
不知道你为啥怼我! 最看不起的就是有点技术就门缝看人的人!我虚心请教!你这样回复!真让人看不起! 循环取标题就好了 haiai8532 发表于 2019-11-28 21:20
循环取标题就好了
求循环的思路 haiai8532 发表于 2019-11-28 21:20
循环取标题就好了
判断项目索引这段一直没弄明白 判断循环+寻找文本 如果做搜索的话,这样的有点板,得到内置关键词 风风风 发表于 2019-11-28 23:13
如果做搜索的话,这样的有点板,得到内置关键词
事先录入每个关键词这个思路我也想过!但是有缺点!一旦关键词太多就会很占代码
页:
[1]
2