此主题相关图片如下:屏幕截图 2022-11-28 235026.png
多层表头,想设置竖线加粗,但是上边总是少一段,代码如下:
Dim t As Table = Tables("窗口增加表格_table2")
Dim cs1 As C1.Win.C1FlexGrid.CellStyle = t.Grid.Styles.Add("样式111")
cs1.forecolor = Color.red
'cs1.backcolor = Color.yellow
cs1.Border.Width = 3
cs1.Border.Color = Color.Red
cs1.Border.Direction = C1FlexGrid.BorderDirEnum.Vertical
For i As Integer = 0 To 11
For j As Integer = 2 To t.cols.count
t.Grid.SetCellStyle(i, j, cs1)
j = j + 2
此主题相关图片如下:屏幕截图 2022-11-28 235339.png
Next
Next
感谢指点