以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何设置sqltable的表样式  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=184328)

--  作者:lisangyu
--  发布时间:2022/12/3 20:51:00
--  如何设置sqltable的表样式
蓝总:怎么调整sql表整个表的样式,像标题颜色,背景和字体颜色等等
--  作者:有点蓝
--  发布时间:2022/12/4 19:57:00
--  
http://www.foxtable.com/webhelp/topics/3305.htm


--  作者:lisangyu
--  发布时间:2022/12/5 16:32:00
--  
蓝总:下午好!】
Dim kpis() As String = e.Form.Controls("CheckedComboBox1").Text.Split(",")
Dim g As New GroupTableBuilder("统计表1", DataTables("部门分解指标完成情况"), "分解后指标 in (\'" & String.join("\',\'", kpis) & "\') and 月份 = max(月份)")
\'g.Groups.AddDef("月份")
g.Groups.AddDef("分解后指标", "指标")
g.Totals.AddDef("完成情况", "完成情况")
g.Groups.AddDef("单位")
g.Build()
\'MainTable = Tables("统计表1")
Dim t As Table = e.Form.Controls("Table1").Table
t.DataSource = g.BuildDataSource
Tables("数据展示_Table1").SetColVisibleWidth("指标|200|单位|60|完成情况|160")
Tables("数据展示_Table1").SysStyles("Normal").ForeColor = Color.Blue
--------------------------------
为什么数据展示时,会每隔一行字体颜色有变化 

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20221205162911.png
图片点击可在新窗口打开查看



--  作者:有点蓝
--  发布时间:2022/12/5 16:43:00
--  
请上传实例说明