以文本方式查看主题
- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 副本表的drawcell事件 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=27831)
|
-- 作者:雁过不留痕8
-- 发布时间:2013/1/11 16:01:00
-- 副本表的drawcell事件
在“查询”窗口的表中table1为normal型,绑定表”首件记录表“作为副本true在table1中要实现“检验结论“为“未通过审核”的单元格背景颜色为红操作与代码为下 1)自定义表样式为样式1,背景为红色 2)在首件记录表的”项目属性“”全局表事件“的"drawcell"事件中编写如下代码: Select Case e.Table.Name Case "查询_table1" Dim a1 As Row=Tables("查询_table1").current If a1("检验结论")="未通过审核"
a1("检验结论").Style= "样式1" End If End Select 运行后,没有成功,请问是为什么呢?
|
-- 作者:lin_hailun
-- 发布时间:2013/1/11 16:11:00
--
这样写代码
Select Case e.Table.Name Case "查询_table1" If e.col.Name = "检验结论" AndAlso e.Row("检验结论") = "未通过审核" Then e.Style= "样式1" End If End Select
|
-- 作者:雁过不留痕8
-- 发布时间:2013/1/11 16:11:00
--
Tables("查询_table1").Filter="[检验结论]IsNull"运行出现错误 missing operand after "isnull" operater
|
-- 作者:雁过不留痕8
-- 发布时间:2013/1/11 16:18:00
--
林老师,我还是没有实现,是怎么回事呢
此主题相关图片如下:`{kumy27x@qw)wba7`oy.jpg

|
-- 作者:lin_hailun
-- 发布时间:2013/1/11 16:25:00
--
以下是引用雁过不留痕8在2013-1-11 16:11:00的发言:
Tables("查询_table1").Filter="[检验结论]IsNull"运行出现错误 missing operand after "isnull" operater
Tables("查询_table1").Filter="[检验结论] Is Null"
|