在子表的DataColChanged事件中if e.datacol.name="是否处理" then
dim drlist as List(or datarow) = datatables("表B").select("编号='" & e.datarow("编号") & "'")
if drlist.count=DataTables("表B").Compute("count(编号)","编号='" & e.datarow("编号") & "' and 是否处理=true") then
e.datarow.GetParentRow("表A")("是否处理")=true
end if
end if
[此贴子已经被作者于2013-11-27 17:53:56编辑过]