以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  跨表勾选的问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=88204)
--  作者：douglas738888
--  发布时间：2016/7/28 18:05:00
--  跨表勾选的问题
请教老师，下面这段代码是写在AfterEdit里面的，有个问题，如果  审批完成是在 表A正本表里面直接勾选，可实现跨表勾选，如果

是通过表B跨表勾选表A 的审批完成，  工作任务完成提醒，就无法勾选指定的逻辑列。

If e.Col.name = "审批完成" Then  \'工作策划主表,对应项目编号的审批完成全部勾选后, 工作任务完成提醒 对应项目编号的 各设计阶段完成逻辑列  勾选 20160722
    Dim pr As DataRow
    Dim cr As Row = e.Row
    Dim c11 As Integer = cr.Table.Compute("count(项目编号)", "项目编号 = \'" & cr("项目编号") & "\' and 设计阶段 = \'" & cr("设计阶段") & "\'")
    Dim c22 As Integer = cr.Table.Compute("count(项目编号)", "项目编号 = \'" & cr("项目编号") & "\' and 审批完成 = true and 设计阶段 = \'" & cr("设计阶段") & "\'")
    pr = DataTables("工作任务完成提醒").find("项目编号 = \'" & cr("项目编号") & "\'")
    If pr IsNot Nothing Then
        pr(cr("设计阶段") & "_完成") = (c11 = c22)
    End If
End If

好像要用 e.dataCol  和e.DataRow
[此贴子已经被作者于2016/7/28 18:26:20编辑过]
--  作者：狐狸爸爸
--  发布时间：2016/7/29 8:13:00
--  
我看的有点稀里糊涂的， 这种计算，一般不是afterEdit，一般用DataColChanged事件：

如果搞不定，请重新描述问题，或者做个例子发上来。