- 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=90214)
-- 发布时间：2016/9/7 19:21:00
-- 设置周期
这个是什么问题啊！！！
此主题相关图片如下：qq截图20160907192116.jpg
此主题相关图片如下：qq截图20160907192116.jpgIf e.Col.name = "金额" Then
If e.Date.Today = False AndAlso e.Row.IsNull("金额") = False Then
e.style = "已付款"
End If
If e.Date.Today AndAlso e.Row.IsNull("订单日期") = False Then
Dim dt1 As Date = e.Row("账期")
Dim tp As TimeSpan = Date.Today - dt1
If tp.TotalDays <= -5 Then
e.Style = "已过账期"
Else
e.Style = "已付款"
End If
End If
End If
-- 发布时间：2016/9/7 20:56:00
--
e.Date.Today想用来表示什么？
-- 发布时间：2016/9/7 21:30:00
--
得到今天是日期，不是啊
-- 发布时间：2016/9/7 21:41:00
--
我想 设置一写时间段 超过了这些时间段就 改变 样式字体，然后 还有一逻辑列，选中后改变为另外一种字体 ，搞了一下午了。就不知道该怎么做。
-- 发布时间：2016/9/7 21:44:00
--
If e.Col.name = "金额" Then
If e.Row.IsNull("金额") = False Then
e.style = "已付款"
End If
If e.Row.IsNull("订单日期") = False Then
Dim dt1 As Date = e.Row("账期")
Dim tp As TimeSpan = Date.Today - dt1
If tp.TotalDays <= -5 Then
e.Style = "已过账期"
Else
e.Style = "已付款"
End If
End If
End If
-- 发布时间：2016/9/7 21:59:00
--
如果账期列有几个不同的时间段呢，比如一个月 两个月 或者当月
-- 发布时间：2016/9/7 22:01:00
--
就是当过了选择的日期就改变样式 ，然后 勾选逻辑列 有为另外一种样式。是不是先要把声明时间的长短啊，
此主题相关图片如下：qq截图20160907190523.jpg
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:改色.table |
-- 发布时间：2016/9/7 22:29:00
--
If e.Col.name = "金额" Then
Dim dt1 As Date = e.Row("订单日期")
Select Case e.Row("账期")
Case "本月"
If dt1.Month = Date.Today.Month Then
e.Style = "已过账期"
End If
Case "次月"
If dt1 < Date.Today.AddMonths(-1) Then
e.Style = "已过账期"
End If
Case "两个月"
If dt1 < Date.Today.AddMonths(-2) Then
e.Style = "已过账期"
End If
Case Else
e.Style = "已过账期"
End Select
If e.Row("付款否") = True Then
e.style = "已付款"
End If
End If
其他3个4个月的代码自己参考着做
-- 发布时间：2016/9/7 22:46:00
--
好的 太感谢了， 忙了一下午 没你我就浪费了
-- 发布时间：2016/9/7 22:55:00
--
感谢你 ，可以用了 谢谢 谢谢