- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]表中的“全县合计”行字体加粗、变成红色 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=28773)
-- 发布时间：2013/2/18 16:59:00
-- [求助]表中的“全县合计”行字体加粗、变成红色
我想将单位年级人数统计表中的“全县合计”行字体加粗、变成红色，怎么办？请指教。谢谢!
此主题相关图片如下：单位年级人数统计.jpg
示例：
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:复件 小学期末成绩统计程序.rar |
-- 发布时间：2013/2/18 17:05:00
--
darwcell 看看
-- 发布时间：2013/2/18 17:12:00
--
为什么不用汇总模式啊？
-- 发布时间：2013/2/18 17:16:00
--
现在还不习惯用汇总模式
-- 发布时间：2013/2/18 17:21:00
--
楼主你参考一下弄就行了。
给指定单元格设置样式……
Dim ns As C1.Win.C1FlexGrid.CellStyle = CurrentTable.grid.Styles.Add("自定义的样式")
ns.ForeColor = Color.Red
ns.Font = New Font("宋体", 10, FontStyle.Bold)
CurrentTable.grid.SetCellStyle(1,1,ns)
CurrentTable.grid.SetCellStyle(1,2,ns)
CurrentTable.grid.SetCellStyle(1,3,ns)
-- 发布时间：2013/2/18 17:35:00
--
直接用底层了?
-- 发布时间：2013/2/18 17:36:00
--
以下是引用jianjingmaoyi在2013-2-18 17:35:00的发言：
直接用底层了?
直接用底层了?
因为是临时表，没有办法了。
-- 发布时间：2013/2/18 21:59:00
--
以下是引用lin_hailun在2013-2-18 17:21:00的发言：
楼主你参考一下弄就行了。
给指定单元格设置样式……
Dim ns As C1.Win.C1FlexGrid.CellStyle = CurrentTable.grid.Styles.Add("自定义的样式")
ns.ForeColor = Color.Red
ns.Font = New Font("宋体", 10, FontStyle.Bold)
CurrentTable.grid.SetCellStyle(1,1,ns)
CurrentTable.grid.SetCellStyle(1,2,ns)
CurrentTable.grid.SetCellStyle(1,3,ns)
楼主你参考一下弄就行了。
给指定单元格设置样式……
Dim ns As C1.Win.C1FlexGrid.CellStyle = CurrentTable.grid.Styles.Add("自定义的样式")
ns.ForeColor = Color.Red
ns.Font = New Font("宋体", 10, FontStyle.Bold)
CurrentTable.grid.SetCellStyle(1,1,ns)
CurrentTable.grid.SetCellStyle(1,2,ns)
CurrentTable.grid.SetCellStyle(1,3,ns)
谢谢!这个是指确定的单元格定义(某行,某列)，我是想将所有“单位=\'全县合计\'”的整行定义。又怎么写代码？
[此贴子已经被作者于2013-2-18 22:03:49编辑过]
-- 发布时间：2013/2/19 8:42:00
--
写全局表事件吧
-- 发布时间：2013/2/19 9:17:00
--
生成的时候加入一段代码。
Dim fdr As DataRow = bm.Find("单位 = \'全县合计\'")
Dim pos As Integer = Tables(bm.Name).FindRow(fdr)
Dim ns As C1.Win.C1FlexGrid.CellStyle = Tables(bm.Name).grid.Styles.Add("自定义的样式")
ns.ForeColor = Color.Red
ns.Font = New Font("宋体", 10, FontStyle.Bold)
For i As Integer = 0 To Tables(bm.Name).Cols.Count - 1
Tables(bm.Name).Grid.SetCellStyle(pos+1, i+1, ns)
Next
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:小学期末成绩统计程序.zip |