其中一列为空条件就不成立了。
具体要什么效果?比如上面的4个列,4个列都有数据就查4个列?只有3个列有数据就只查3个列?
Select Case e.DataCol.Name Case "销方名称","货物或应税劳务名称","fa piaopiao种","fa piao归类" |
dim filter as string = "经营单位= '" & _jydw &"'"
dim nms1() as string = {"销方名称","货物或应税劳务名称","fa piaopiao种"}
dim nms2() as string = {"供应商名称","开piao内容","fa piaopiao种"}
for i as integer = 0 to nms1.length - 1
if e.DataRow.isnull(nms1(i)) = false then
filter = filter & " and " & nms2(i) & " = '" & e.DataRow(nms1(i)) & "'"
end if
next
pr1 = DataTables("凭证规则").sqlFind(filter )
If pr1 IsNot Nothing Then
e.DataRow("名称") = pr1("名称")
end if