增加一个临时列，添加2个样式：样式1、样式2
drawcell事件：
If e.Row.Index = 0 Then
e.Style = "样式1"
e.Row("临时列") = 1
Else
Dim r As Row = e.Table.Rows(e.Row.Index - 1)
If e.Row("线路号") = r("线路号")
e.Row("临时列") = r("临时列")
e.Style = "样式" & e.Row("临时列")
Else
If r("临时列") = "2" Then
e.Row("临时列")= "1"
Else
e.Row("临时列")= "2"
End If
e.Style = "样式" & e.Row("临时列")
End If
End If
回2楼，父表和子表的关联列的列类型必须一样，都是字符列，或者都是整数列
[此贴子已经被作者于2018/7/21 16:00:44编辑过]
加好友 
发短信
Post By：2018/7/21 16:00:00 [显示全部帖子]
