一楼的代码改成下面这样就正常了,类似的问题已经碰到第二次了,就是家里SQL,出现问题:Dim kcbs As String = DataTables("成品入库表").SQLGetComboListString("缸号","缸号 is not null")
kcbs = "('" & kcbs.replace("|","','") & "')"
'-------历遍染色生产表的缸号生成集合-------
DataTables(e.Form.Name & "_table9").LoadFilter = "_identify is not null"
DataTables(e.Form.Name & "_table9").Load
Dim ckbs As String = DataTables(e.Form.Name & "_table9").GetComboListString("缸号","配缸 = true and 缸号 not In " & kcbs)
ckbs = "('" & ckbs.replace("|","','") & "')"
DataTables(e.Form.Name & "_table9").LoadFilter = "缸号 in " & ckbs
DataTables(e.Form.Name & "_table9").Load