- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 怎么能让表格中相同的信息以不同颜色来区分 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=138698)
-- 发布时间：2019/8/3 14:50:00
-- 怎么能让表格中相同的信息以不同颜色来区分
如何能使表格内根据某列的值来分类显示，
第一列 第二列 第三列
111 AAA AAAA
111 BBB BBBB
222 CCC CCCC
111 DDD DDDD
222 EEE EEEE
333 FFF FFFF
如何能根据第一列的内容，把111,222,333用不同的颜色区分开来？
-- 发布时间：2019/8/3 15:37:00
--
参考：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=80405&skin=0
-- 发布时间：2019/9/18 16:11:00
--
这个功能实现了，有个小问题，随机的颜色跳出来后，字有时候看不清楚，我想把字通过一个按钮来换成黑或白，在drawcell里if else后，不是无缝切换啊，怎么弄？
-- 发布时间：2019/9/18 16:16:00
--
上传实例说明
-- 发布时间：2019/9/18 16:36:00
--
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目1.table |
就是想让按钮切换时，字体颜色实现黑白切换
-- 发布时间：2019/9/18 16:52:00
--
按钮
Dim r As Row = Tables("表A").Current
If r IsNot Nothing Then
DataTables("表A").styles(r("第一列")).ForeColor = Color.white
Tables("表A").refresh
End If
黑色按钮把颜色改为黑色即可
-- 发布时间：2019/9/18 17:39:00
--
这个我知道，可是我想把整个表格的字颜色都改成白色的话，没有办法在drawcell里做？只能是按照这种方式改？改当前行或者遍历所有行改颜色吗？
-- 发布时间：2019/9/18 17:44:00
--
没有办法，只能在外部遍历所有的样式改
-- 发布时间：2019/9/24 22:51:00
--
随机指定了整行的颜色后，选中当前行看不清，只有一个淡淡的边框，如何能在这个基础上还能实现突出选定行的功能？
-- 发布时间：2019/9/24 22:56:00
--
在drawcell里面设置当前行颜色。贴出代码说明