以文本方式查看主题 -  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp) --  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2) ----  个数条件统计  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=149098)

--  作者：有点蓝 --  发布时间：2020/4/23 11:15:00 --   e.DataRow("完成状态") = "已完成" 改为 e.DataRow("完成状态") = "待分解"

--  作者：有点蓝 --  发布时间：2020/4/23 13:52:00 --   Dim cnt1 As Integer = DataTables("开发资料信息").SQLCompute("Count(完成状态)","[成品编码] = \'" & e.DataRow("成品编码") & "\' and [次级编码] = \'" & e.DataRow("次级编码") & "\'") If cnt1 = 0 Then     e.DataRow("完成状态") = "待分解" Else cnt1= DataTables("开发资料信息").SQLCompute("Count(完成状态)","[成品编码] = \'" & e.DataRow("成品编码") & "\' and [次级编码] = \'" & e.DataRow("次级编码") & "\' and 完成状态 = \'待处理\'") If cnt1 > 0 Then     e.DataRow("完成状态") = "待处理" Else     e.DataRow("完成状态") = "已完成" End If End If