| 以文本方式查看主题 - Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp) -- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2) ---- 颜色显示错误 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=125770) |
| -- 作者：有点蓝 -- 发布时间：2018/10/7 8:47:00 -- 首先要理解代码： e.Col.IsNumeric 表示是数值列 e.Col.Name <> "订单状态" 表示不是"订单状态"列， 上面判断了是数值列才会进入if里面的代码，所以下面的判断就出错了，数值和字符串比较，自然就出错了 e.Row(e.Col.Name) = "未加工"
|
| -- 作者：有点蓝 -- 发布时间：2018/10/7 10:01:00 -- 连自己要做什么都搞不清楚么 If e.Col.IsNumeric AndAlso e.Col.Name <> "订单状态" Then 改为 If e.Col.Name = "订单状态" Then
|
| -- 作者：有点蓝 -- 发布时间：2018/10/7 14:06:00 -- 代码没有任何问题，你添加样式了吗 |
| -- 作者：有点甜 -- 发布时间：2018/10/8 9:23:00 -- 代码看着没有问题，上传一个实例测试。 |
| -- 作者：有点甜 -- 发布时间：2018/10/8 11:00:00 -- 以下是引用nuoyan88在2018/10/8 10:18:00的发言：
老师，能远程吗？数据源不会打包
1、你的代码报什么错？报错贴出来看看；
2、单独做一个项目，导入表格，写入代码，如果有同样问题，那个项目发上来。 |
| -- 作者：有点甜 -- 发布时间：2018/10/8 11:45:00 -- 看看这里，样式需要额外添加的
http://www.foxtable.com/webhelp/scr/2628.htm
|
| -- 作者：有点蓝 -- 发布时间：2018/10/16 21:16:00 -- 有点麻烦，比如“进行中”，其他一样 Dim fnt As font = Tables("生产排产表_生产排产表").Font Dim style = Tables("生产排产表_生产排产表").grid.Styles.Add("User进行中") \'名称必须是User+样式名称 Dim f As New Font(fnt.Name,fnt.size, FontStyle.Bold) style.Font = f style.BackColor = Color.Green style.ForeColor = Color.white |