超级列表框的计算问题

w322zkkw

商品相加  然后在减掉没找到的商品金额  就像第一行  商品购买记录里的 商品关键词是口红和纸巾  就只算口红和纸巾的×数量   后得到的金额 在去掉当行没匹配到的商品的金额  然后获取到的金额 到对应的一行里 单个关键词可以用 可是我把关键词换成多关键匹配就不能了 麻烦大佬帮忙帮忙修改一下源码 例子.e (957.58 KB, 下载次数: 1) 2024-5-6 15:00 上传 点击文件名下载附件 上一个贴的贴地址是https://bbs.125.la/forum.php?mod ... 14820620&extra= 有大神能帮忙的  两个贴一起结贴给

青梅

emmm 这样就行

补充内容 (2024-5-6 16:57):
局_商品总价计算前忘记归零了,自己加一下

w322zkkw

大部分都写好了 只是单个关键词能用多个关键词就不行了 麻烦大神们帮我改成能多个关键词能用的

无痕雨

多个关键字需要把金额单独加入处理下 不然会冲突

青梅

  

子程序名	返回值类型	公开	备 注
_按钮2_被单击

变量名	类 型	静态	数组	备 注
局_寻找商品组	文本型		0
局_计次	整数型
局_计次_1	整数型
局_商品单价	双精度小数型
局_商品金额	双精度小数型
局_商品总价	双精度小数型
局_总商品	文本型		0

局_寻找商品组 ＝ 分割文本 (删首尾空 (编辑框1.内容), “|”, )
计次循环首 (超级列表框1.取表项数 (), 局_计次)
' 先把总的商品提取出来
局_总商品 ＝ 分割文本 (超级列表框1.取标题 (局_计次 － 1, 2), “ ”, )
计次循环首 (取数组成员数 (局_总商品), 局_计次_1)
' 看下单价
局_商品单价 ＝ 到数值 (文本区分_只取数字 (局_总商品 [局_计次_1]))
' 算出单个商品的总价
局_商品金额 ＝ 局_商品单价 × 到整数 (超级列表框1.取标题 (局_计次 － 1, 3))
' 看下编辑框里面是否有这个商品
判断 (寻找文本 (编辑框1.内容, 文本区分_只取汉字 (局_总商品 [局_计次_1], , ), , 假) ≠ -1)
' 有
超级列表框1.置标题 (局_计次 － 1, 5, “找到关键商品”)
' 价格相加
局_商品总价 ＝ 局_商品总价 ＋ 局_商品金额

' 没有
局_商品单价 ＝ 到数值 (文本区分_只取数字 (局_总商品 [局_计次_1]))
' 价格相减
局_商品总价 ＝ 局_商品总价 － 局_商品金额

计次循环尾 ()
' '好了价格出来了
超级列表框1.置标题 (局_计次 － 1, 4, 到文本 (局_商品总价))
计次循环尾 ()

i支持库列表	支持库注释
iext	扩展界面支持库一

.版本 2<br /> .支持库 iext<br /> <br /> .子程序 _按钮2_被单击<br /> .局部变量 局_寻找商品组, 文本型, , "0"<br /> .局部变量 局_计次, 整数型<br /> .局部变量 局_计次_1, 整数型<br /> .局部变量 局_商品单价, 双精度小数型<br /> .局部变量 局_商品金额, 双精度小数型<br /> .局部变量 局_商品总价, 双精度小数型<br /> .局部变量 局_总商品, 文本型, , "0"<br /> <br /> 局_寻找商品组 ＝ 分割文本 (删首尾空 (编辑框1.内容), “|”, )<br /> .计次循环首 (超级列表框1.取表项数 (), 局_计次)<br />     ' 先把总的商品提取出来<br />     局_总商品 ＝ 分割文本 (超级列表框1.取标题 (局_计次 － 1, 2), “ ”, )<br />     .计次循环首 (取数组成员数 (局_总商品), 局_计次_1)<br /> <br />         ' 看下单价<br />         局_商品单价 ＝ 到数值 (文本区分_只取数字 (局_总商品 [局_计次_1]))<br />         ' 算出单个商品的总价<br />         局_商品金额 ＝ 局_商品单价 × 到整数 (超级列表框1.取标题 (局_计次 － 1, 3))<br /> <br />         ' 看下编辑框里面是否有这个商品<br />         .判断开始 (寻找文本 (编辑框1.内容, 文本区分_只取汉字 (局_总商品 [局_计次_1], , ), , 假) ≠ -1)<br />             ' 有<br />             超级列表框1.置标题 (局_计次 － 1, 5, “找到关键商品”)<br />             ' 价格相加<br />             局_商品总价 ＝ 局_商品总价 ＋ 局_商品金额<br /> <br />         .默认<br />             ' 没有<br />             局_商品单价 ＝ 到数值 (文本区分_只取数字 (局_总商品 [局_计次_1]))<br />             ' 价格相减<br />             局_商品总价 ＝ 局_商品总价 － 局_商品金额<br /> <br />         .判断结束<br /> <br />     .计次循环尾 ()<br />     ' '好了价格出来了<br />     超级列表框1.置标题 (局_计次 － 1, 4, 到文本 (局_商品总价))<br /> .计次循环尾 ()