If Forms("零售查询窗口").Controls("DateTimePicker1").value = "" Or Forms("零售查询窗口").Controls("DateTimePicker1").value = "" Then
Dim s As List(Of String) = DataTables("零售明细表").SQLGetValues("零售单编号","商品编号 = '" & Tables("零售查询窗口_table1").current("永久编号") & "' and 日期 = '" & Date.today & "' and 店名 = '" & vars("默认店名") & "'")
DataTables("零售总表").LoadFilter = "[店名] = '" & vars("默认店名") & "' And [零售单编号] In (" & String.join(",", s.toarray) & ")"
DataTables("零售总表").Load
End If
这段代码报错,请问问题出在哪