此主题相关图片如下：1.jpg
老师，我想实现销售时，会员打折，现在设置了会员打六折，商品类别为 白酒、饮料，但是只有白酒打折，饮料不起左右，也就是只对排在第一位置的白酒打折，当打折商品类别为1个时，正常
Dim r As Row = Tables("销售明细表").Current
Dim dr1 As DataRow
dr1 = DataTables("会员信息表").Find("商品类别 = '" & r("二级类别") & "'")
If dr1 IsNot Nothing Then
e.DataRow("折扣") = dr1("折扣")
Else
e.DataRow("折扣") = 1
End If
'新增代码
e.DataRow("金额") = e.DataRow("单价")*e.DataRow("数量")*e.DataRow("折扣")
End If
End If
上图中，打折的商品类别是以这样的形式保存在，这个怎么一个个商品类别怎么比较，不知道该怎么弄，请老师帮忙一下
加好友 
发短信
Post By：2020/7/14 1:44:00 [只看该作者]
