关于超级列表框计算 在一次问题

w322zkkw

商品相加  然后在减掉没找到的商品金额  就像第一行  商品购买记录里的 商品关键词是口红和纸巾  就只算口红和纸巾的×数量   后得到的金额 在去掉当行没匹配到的商品的金额  然后获取到的金额 到对应的一行里
单个关键词可以用
可是我把关键词换成多关键匹配就不能了
麻烦大佬帮忙帮忙一下 例子.e (957.58 KB, 下载次数: 5)

2024-5-6 02:26 上传

点击文件名下载附件

Suky

Suky 发表于 2024-5-6 05:09

  

数组1 ＝ 分割文本 (, , )  ' 关键字数组
[/quote]
[e=1].版本 2
数组1 ＝ 分割文本 (, , )  ' 关键字数组
数组2 ＝ 分割文本 (, , )  ' 品类数组
计次循环首 (取数组成员数 (数组1), n1)
计次循环首 (取数组成员数 (数组2), )
n2 ＝ n2 ＋ 1
如果真 (寻找文本 (数组2 [n2], 数组1 [n1], , 假) ≠ -1)  ' 找到
' 此处代码  分割文本  取品名和数值、计算数量等
删除成员 (数组2, n2, 1)  ' 将匹配完并计算过的删除以免重复计算
n2 ＝ n2 － 1

计次循环尾 ()
计次循环尾 ()
计次循环首 (取数组成员数 (数组2), )  ' 此时数组2剩余的成员就是不与所有关键字匹配的品名
' 累计数组2中剩余的所有品名与数值等
计次循环尾 ()

.版本 2<br /> <br /> 数组1 ＝ 分割文本 (, , )  ' 关键字数组</blockquote></div><br /> [e=1].版本 2<br /> <br /> 数组1 ＝ 分割文本 (, , )  ' 关键字数组<br /> 数组2 ＝ 分割文本 (, , )  ' 品类数组<br /> .计次循环首 (取数组成员数 (数组1), n1)<br />     .计次循环首 (取数组成员数 (数组2), )<br />         n2 ＝ n2 ＋ 1<br />         .如果真 (寻找文本 (数组2 [n2], 数组1 [n1], , 假) ≠ -1)  ' 找到<br />             ' 此处代码  分割文本  取品名和数值、计算数量等<br />             删除成员 (数组2, n2, 1)  ' 将匹配完并计算过的删除以免重复计算<br />             n2 ＝ n2 － 1<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (数组2), )  ' 此时数组2剩余的成员就是不与所有关键字匹配的品名<br />     ' 累计数组2中剩余的所有品名与数值等<br /> .计次循环尾 ()

补充内容 (2024-5-6 05:13):
数组2循环前面放一行代码   n2=0，重置一下每次内层循环后n2的值吧，例子就这样

Suky

处理思路：
①关键词分割得到数组1，品类分割得到数组2
②以数组1成员数计次循环，在此循环中  每次取一个关键词
   取出的关键词   以数组2当前成员数计次循环，匹配到关键词的时候   累计数值并删除数组2对应成员
③以数组2当前成员数计次循环  统计非关键字品类   并统计数值
④根据结果置标题

Suky

Suky 发表于 2024-5-6 05:00
处理思路：
①关键词分割得到数组1，品类分割得到数组2
②以数组1成员数计次循环，在此循环中  每次取一个 ...

  

数组1 ＝ 分割文本 (, , )  ' 关键字数组
数组2 ＝ 分割文本 (, , )  ' 品类数组
计次循环首 (取数组成员数 (数组1), n1)
计次循环首 (取数组成员数 (数组2), n2)
如果真 (寻找文本 (数组2 [n2], 数组1 [n1], , 假) ≠ -1)  ' 找到
' 此处代码  分割文本  取品名和数值、计算数量等
删除成员 (数组2, n2, 1)  ' 将匹配完并计算过的删除以免重复计算

计次循环尾 ()
计次循环尾 ()
计次循环首 (取数组成员数 (数组2), )  ' 此时数组2剩余的成员就是不与所有关键字匹配的品名
' 累计数组2中剩余的所有品名与数值等
计次循环尾 ()

.版本 2<br /> <br /> 数组1 ＝ 分割文本 (, , )  ' 关键字数组<br /> 数组2 ＝ 分割文本 (, , )  ' 品类数组<br /> .计次循环首 (取数组成员数 (数组1), n1)<br />     .计次循环首 (取数组成员数 (数组2), n2)<br />         .如果真 (寻找文本 (数组2 [n2], 数组1 [n1], , 假) ≠ -1)  ' 找到<br />             ' 此处代码  分割文本  取品名和数值、计算数量等<br />             删除成员 (数组2, n2, 1)  ' 将匹配完并计算过的删除以免重复计算<br />         .如果真结束<br /> <br />     .计次循环尾 ()<br /> .计次循环尾 ()<br /> .计次循环首 (取数组成员数 (数组2), )  ' 此时数组2剩余的成员就是不与所有关键字匹配的品名<br />     ' 累计数组2中剩余的所有品名与数值等<br /> .计次循环尾 ()

整体结构类似这样子


补充内容 (2024-5-6 05:11):
数组2的计次循环，得改一改 ，这里放错位置了

补充内容 (2024-5-6 05:11):
看下一层的例子吧