以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  表标题字体修改  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=68583)

--  作者:sky2015
--  发布时间:2015/5/20 19:24:00
--  表标题字体修改
如何用代码修改表标题字体,不是单元格标题
求助

--  作者:大红袍
--  发布时间:2015/5/20 19:30:00
--  

Dim cls() As String = {"第一列", "第五列"}

Dim cs1 As C1.Win.C1FlexGrid.CellStyle = Tables("表A").grid.Styles.Add("cs1")
cs1.Font = new Font("宋体", 15)
cs1.Backcolor = Color.Red
For Each c As String In cls
    Tables("表A").Grid.SetCellStyle(0, Tables("表A").Cols(c).Index+1, cs1)
Next

Tables("表A").AutoSizeHeaderRow


--  作者:sky2015
--  发布时间:2015/5/20 19:38:00
--  
楼上的代码好像是设置列标题的,有没有设置表标题的

还有表网格线颜色的
图片点击可在新窗口打开查看

--  作者:大红袍
--  发布时间:2015/5/20 19:43:00
--  

basemainform.Controls("MainPages").Font = new Font("宋体", 15)

 

----------------

 

Tables("表A").grid.styles.Normal.Border.Color = Color.Red
Tables("表A").grid.styles.Normal.Border.Style = 1
Tables("表A").grid.styles.Normal.Border.width = 5
Tables("表A").grid.styles.Normal.Border.Direction = 2 \'0-2


--  作者:sky2015
--  发布时间:2015/5/20 20:26:00
--  
大红袍 非常感谢 图片点击可在新窗口打开查看图片点击可在新窗口打开查看图片点击可在新窗口打开查看