主题：关于表中列边框的颜色

最多只能这样。

Dim t As Table = Tables("表A")
Dim cs1 As C1.Win.C1FlexGrid.CellStyle = t.Grid.Styles.Add("样式1")

'cs1.forecolor = Color.red
'cs1.backcolor = Color.yellow
cs1.Border.Width = 3
cs1.Border.Color = Color.Red
cs1.Border.Direction = 2
For i As Integer = 1 To t.rows.count
    For j As Integer = 2 To 2
        t.Grid.SetCellStyle(i, j, cs1)
    Next
Next

没办法，这个是设置单元格边框的样式的，只能一起设置。

改成0，可以设置右边框和下边框。