1、文本框输入值 蛙服下裤,7018T恤
2.代码不加修改
Dim cnm As WinForm.DropDownBox = e.Form.Controls("comname")'定义组合框
Dim str As String = cnm.text '定义组合框字符串内容
Dim ss As String() = str.Split(",")
Dim f As String
For Each tt As String In ss
tt = tt.Trim(" '")
f = f & " or 商品简称 like '%" & tt & "%'"
Next
f=f.Remove(0,14)
Dim sql As String = "s*e*l*e*c*t 商品简称,规格名,审核时间,sum(数量) as 数量 from ThrMon where 审核时间 >= '" & Date1 & " 'and 审核时间 <= '" & Date2 & " ' And 商品简称 like " & f & "group by 商品简称,规格名,审核时间 "
msgbox(sql)
可以正常运行,现在是如何将 ’蛙服下裤‘,’7018T恤‘ 转化为 蛙服下裤,7018T恤 问题
此主题相关图片如下:360截图20190604140142733.jpg
此主题相关图片如下:360截图20190604140152446.jpg