特定行的网格线？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

如何在特定行，例如汇总行。在单元格增加下方的网格线？

If e.Row.IsGroup=True Then

e.style="group"

e.Row.grid.styles.Normal.Border.Style = C1FlexGrid.BorderStyleEnum.Flat ？

e.Row.grid.styles.Normal.Border.width = 1 ？

End If

还是下面的代码怎么改改？

Dim cs1 As C1.Win.C1FlexGrid.CellStyle = CurrentTable.Grid.Styles.Add("Borderline")

Dim rng As C1.Win.C1FlexGrid.CellRange = CurrentTable.Grid.GetCellRange(1,2, 3,3) 怎么和e.row联系起来？

cs1.backcolor = color.yellow

cs1.forecolor = color.red

cs1.Border.Direction = 1

rng.style = cs1

Dim r As Row

For i As Integer = 0 To Tables("订单").Rows.Count(True) - 1

r = Tables("订单").Rows(i,True)

If r.IsGroup

Dim cs1 As C1.Win.C1FlexGrid.CellStyle = CurrentTable.Grid.Styles.Add("Borderline")

Dim rng As C1.Win.C1FlexGrid.CellRange = CurrentTable.Grid.GetCellRange(i+1,1, i+1,Tables("订单").Cols.Count)

cs1.backcolor = color.yellow

cs1.forecolor = color.red

cs1.Border.Color = color.red

cs1.Border.Direction = 1

rng.style = cs1

End If

这个可以正常显示，但是发现不能点击界面按钮了。

估计是写在了drawcell里面太频繁导致鼠标移入自定义下拉菜单后，点击了不出现下拉菜单。

有什么其他简单增加单元格下划线的办法么？

下面代码注释掉，正常运行；

加上，则显示下划线，但是界面菜单假死

If e.Row.IsGroup=True Then

e.style="group"

'Dim cs1 As C1.Win.C1FlexGrid.CellStyle = CurrentTable.Grid.Styles.Add("Borderline")

'Dim cs2 As C1.Win.C1FlexGrid.CellStyle = CurrentTable.Grid.Styles.Add("Borderline1")

'Dim rng As C1.Win.C1FlexGrid.CellRange = CurrentTable.Grid.GetCellRange(e.Row.Index+2,1, e.Row.Index+2,CurrentTable.Cols.Count-1)

'Dim rng2 As C1.Win.C1FlexGrid.CellRange = CurrentTable.Grid.GetCellRange(e.Row.Index+2,CurrentTable.Cols.Count-1, e.Row.Index+2,CurrentTable.Cols.Count)

'cs1.Border.Color = color.black

'cs1.Border.Direction = 1

'cs1.border.Width=2

'cs2.Border.Color = color.black

'cs2.Border.Direction = 1

'cs2.border.Width=2

'cs1.TextAlign=C1.Win.C1FlexGrid.TextAlignEnum.LeftCenter

'cs2.TextAlign=C1.Win.C1FlexGrid.TextAlignEnum.CenterCenter

'rng.style = cs1

'rng2.style = cs2

End If

OK了，稍微改改，放到打开这个table的菜单上面。紧接着分组统计的代码

主题：特定行的网格线？