主题：子表记录满足父表记录时，父表行如何改变颜色？

 编写父表的drawcell事件。

方法一：在父表加入一列是否已付，判断是否设置样式；

方法二：建议用方法一

子表Datacolchanged事件

If e.DataCol.name = "已付款" Then
    Dim count1 As Integer = e.DataTable.Compute("count(是否付款)","是否付款=True and 关联ID='" & e.DataRow("关联ID") & "'")
    Dim count2 As Integer = e.DataTable.Compute("count(是否付款)","关联ID='" & e.DataRow("关联ID") & "'")
    If count1 = count2 Then
        e.DataRow.getParentRow("父表")("已付款") = True
    Else
        e.DataRow.getParentRow("父表")("已付款") = False       
    End If
End If