以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于自定义样式  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=183493)

--  作者:fvcfox
--  发布时间:2022/11/7 15:38:00
--  关于自定义样式
我的一个table的dataSource = ydt
ydt是通过如下建立的
Dim cmd As New S QLCommand
cmd.C
Dim ydt As DataTable
cmd.CommandText = "S ELECT * From {flbd}  " & "Where 单位 = \'" & Tables("one").Rows(0)("单位") & "\' and 创建者=\'" & Tables("one").Rows(0)("操作员") & "\' and apath=\'" & e.Sender.Text & "\' and pcid=\'" & ComputerId & "\'"
ydt = cmd.ExecuteReader(True)

在程序做了ydt.AddUserStyle("a", Color.orange, Color.black)
问怎样对ydt的DrawCell写代码

--  作者:有点蓝
--  发布时间:2022/11/7 15:41:00
--  
Tables(xxx).dataSource = ydt
Tables(xxx).datatable.AddUserStyle("a", Color.orange, Color.black)
Tables(xxx).DataTable.GlobalHandler.DrawCell=true

然后到全局表事件写代码