- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- [求助]到期提醒，若加一个逻辑列，当确定时，可以将样式变为普通样式吗？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=22219)
-- 发布时间：2012/8/6 15:15:00
-- [求助]到期提醒，若加一个逻辑列，当确定时，可以将样式变为普通样式吗？
Select
Case e.DataCol.NameCase "生产日期","保质天数"
If e.DataRow.IsNull("生产日期") Then
e.DataRow("到期日期") = Nothing
Else
e.DataRow("到期日期") = e.DataRow("生产日期").AddDays(e.DataRow("保质天数"))
End If
End Select
If e.col.Name = "到期日期" Then
If e.Row.IsNull("到期日期") = False
If e.Row("到期日期") < Date.Today.AddDays(10) Then
e.Style = "到期"
End If
End If
End If
现在的问题是当“已处理”为true时，可不可以样式改为普通的？而不显示红
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目2.zip |
-- 发布时间：2012/8/6 15:16:00
--
现在的问题是当“已处理”为true时，可不可以样式改为普通的？而不显示红
底白字？-- 发布时间：2012/8/6 15:23:00
--
就是指南中的“到期提醒”的章节，稍微改动一下，想把它变回去
-- 发布时间：2012/8/6 15:38:00
--
哪代码怎么写啊，，“判断逻辑列是否为True
”？请教我啊
-- 发布时间：2012/8/6 16:03:00
--
楼主还要加强学习啊,否则用着开发版太浪费了
If e.Col.Name = "到期日期" Then
If e.Row.IsNull("到期日期") = False Then
If e.Row("已处理") = False Then
If e.Row("到期日期") < Date.Today.AddDays(10) Then
e.Style = "到期"
End If
End If
End If
End If
-- 发布时间：2012/8/6 16:05:00
--
If e.col.Name = "到期日期" Then
If e.Row.IsNull("到期日期") = False
If e.Row("到期日期") < Date.Today.AddDays(10) Then
If e.Row("已处理") = False Then
e.Style = "到期"
End If
End If
End If
End If
-- 发布时间：2015/8/23 15:15:00
--
此主题相关图片如下：qq截图20150823151447.png
-- 发布时间：2015/8/23 15:17:00
--
贴出代码，上传实例
-- 发布时间：2015/8/23 15:40:00
--
-- 发布时间：2015/8/23 15:43:00
--
上面的代码不会报错