表B(明细表) DataColChanged 事件
Dim cou As Integer
cou = e.DataTable.Compute("count(逻辑列)","逻辑列 = false and ID列 = '" & e.DataRow("ID列") & "'")
Dim dr As DataRow = e.DataRow.GetParentRow("表A")
If cou = 0 Then
dr("逻辑列") = True
Else
dr("逻辑列") = False
End If
[此贴子已经被作者于2015/9/4 17:29:24编辑过]