一个小问题大大失色 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

此主题相关图片如下：大屏问题.png

一个例子而已，根据自己需要改咯。例子只是为了证明仪表里可以添加任意控件。

此主题相关图片如下：1.png

此主题相关图片如下：2.png

还是很生硬，主要是表格的样式，无法与整体匹配，无法与整体容合。

主要问题是表格的样式的限制问题，

表格每一个区域都可以单独设置颜色的，你可以自己设置：

表格每一个区域都可以单独设置颜色的，你可以自己设置：

之前，试过，窗口的表样式与非窗口上的表不一样，非窗口上的表的样式移到窗口上是失效。现在改？

[此贴子已经被作者于2024/10/18 10:27:07编辑过]

我测试都一样的，请上传实例说明

把表格背景设置为与大屏背景一样，隐藏前面行号，类似我这样，也是表格控件做的

此主题相关图片如下：qq20241018-161633.png

或是把示例发出来，我帮你调表格控件

[此贴子已经被作者于2024/10/18 16:19:03编辑过]

此主题相关图片如下：qq20241018-165450.png

单独设置表格样式及配色代码如下，其余的自行研究：

With Tables("例二效果_Table1")

.grid.ScrollBars = 0 '禁止滚动条,0 无 1 横向 2 纵向 3 横向纵向

.S elect( - 1, - 1) '移除焦点行

.Theme = "(none)" '清除表样式

' .grid.rows(0).height = 0 '隐藏表头

.ForeColor = Color.LightGray '表格区字体颜色

.SetHeaderCellBackColor("日期", Color.MidnightBlue)'标题区背景颜色

.SetHeaderCellBackColor("数量", Color.MidnightBlue)'标题区背景颜色

.SetHeaderCellForeColor("日期", Color.LightGray)'标题区背景颜色

.SetHeaderCellForeColor("数量", Color.LightGray)'标题区背景颜色

.grid.styles.Normal.Border.Color = Color.SkyBlue '表格线颜色

.grid.styles.Normal.Border.Style = 1 '1为单线,2为双线

.grid.styles.Normal.Border.width = 0.6 '表格线宽

.grid.styles.Normal.Border.Direction = 1 '0为横竖线,1为横,2为竖

.grid.Styles("EmptyArea").Border.Color = Color.FromARGB(255,255,255) 'Transparent '表格边框颜色

.DataTable.SysStyles("Focus").ForeColor = Color.Red '焦点单元格字体颜色

.DataTable.SysStyles("EmptyArea").BackColor = Color.MidnightBlue '空白区背景色

.DataTable.SysStyles("Normal").BackColor = Color.MidnightBlue '数据区背景色

.DataTable.SysStyles("Focus").BackColor = Color.FromARGB(255, 255, 255) '焦点单元格背景颜色

.DataTable.SysStyles("CurrentRow").BackColor = Color.FromARGB(255, 255, 255) '当前行背景颜色

.ExtendLastCol = True '自动列宽

End With

[此贴子已经被作者于2024/10/18 17:13:25编辑过]

标题列的边框怎么设置颜色或是宽度？

主题：一个小问题大大失色