以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助] 特定列的背景色更改为蓝色  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=114188)

--  作者:2900819580
--  发布时间:2018/1/31 11:34:00
--  [求助] 特定列的背景色更改为蓝色
Dim dtname As String = "新增报价"
Dim tb As Table = Tables(e.Form.Name & "_Table1")
Dim dt As DataTable = DataTables(dtname)
Dim Cn1() As String  = {"名称","规格型号","单位","电子档文件","扫描文件"}
For Each c As String In cn1
    dt.DataCols(c).AllowEdit = False
tb.DataTable.Styles(c).BackColor = Color.Red
 列的背景色更改为蓝色。
Next

如何实现上面红色字的效果 ,是副本表,没办法在DrawCell里写代码。
[此贴子已经被作者于2018/1/31 11:36:52编辑过]

--  作者:有点甜
--  发布时间:2018/1/31 11:54:00
--  

1、tb.grid.cols(c).style.BackColor = Color.Red

 

2、任何表都可以编写drawcell事件的。副本表的代码,写到主表的drawcell事件去。


--  作者:2900819580
--  发布时间:2018/1/31 14:03:00
--  
没有主表,表的内容是读取数据产生的。
--  作者:有点甜
--  发布时间:2018/1/31 14:29:00
--  
以下是引用2900819580在2018/1/31 14:03:00的发言:
没有主表,表的内容是读取数据产生的。

 

你可以改成sqlTable、sqlQuery类型的表格,这样不就可以写drawcell事件了?

 

如果是临时表,也可以用全局表事件 http://www.foxtable.com/webhelp/scr/0671.htm