按钮:未入库缸号,代码,老师帮我看看下面的代码有什么问题,按下后没有反应Dim kcbs As String = DataTables("成品入库表").SQLGetComboListString("缸号")
kcbs = "('" & kcbs.replace("|","','") & "')"
'-------历遍染色生产表的缸号生成集合-------
Dim Ckbs As String = DataTables("计划配缸通知单").SQLGetComboListString("缸号","配缸 = 1 and 缸号 not in " & kcbs)
Ckbs = "('" & ckbs.replace("|","','") & "')"
DataTables(e.Form.Name & "_table9").LoadFilter = "缸号 in " & ckbs
DataTables(e.Form.Name & "_table9").Load