以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  求助蓝老师  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=177834)

--  作者:gbglsjt
--  发布时间:2022/6/6 21:40:00
--  求助蓝老师
If e.DataCol.Name = "身份证号" Then \'如果更改的是身份证号码列
    If e.DataRow.IsNull("身份证号") Then \'身份证号码是否为空
        e.DataRow("督审查核_无责") = Nothing \'如果为空,则清除状态
        e.DataRow("督审查核_有责") = Nothing
        e.DataRow("督审问责_一形态") = Nothing
        e.DataRow("督审问责_二形态") = Nothing
    Else
        Dim ds As DataRow
             ds = DataTables("信访情况表").Find("[身份证号] = \'" & e.NewValue & "\'")
            If ds IsNot Nothing
             e.DataRow("督审查核_无责") = DataTables("信访情况表").compute("sum(统计列)", "是否有责 = \' & 无责 & \'" And "身份证号= " & e.NewValue & "")
             e.DataRow("督审查核_未结") = DataTables("信访情况表").compute("sum(核计列)", "查核进度 = \' & 未查结 & \'" And "身份证号= " & e.NewValue & "")
             e.DataRow("督审查核_有责") = DataTables("信访情况表").compute("sum(统计列)", "是否有责 = \' & 有责 & \'" And "身份证号= " & e.NewValue & "")
           End If
            
    End If
    
End If

重置身份证号列,提示.NET Framework 版本:4.0.30319.42000
Foxtable 版本:2022.1.30.2
错误所在事件:表,人员综合评价分析表, DataColChanged
详细错误信息:
调用的目标发生了异常。
从字符串“是否有责 = \' & 无责 & \'”到类型“Long”的转换无效。
输入字符串的格式不正确。
这个怎么改?另外如果直接在父表用表达式列计算,count后边怎么加条件?


--  作者:有点蓝
--  发布时间:2022/6/6 21:43:00
--  

e.DataRow("督审查核_无责") = DataTables("信访情况表").compute("sum(统计列)", "是否有责 = \'无责\' And 身份证号= \'" & e.NewValue & "\'")

--  作者:gbglsjt
--  发布时间:2022/6/6 22:07:00
--  
感谢蓝老师