以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  用表达式求季度  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=59328)

--  作者:ccbbdlzj
--  发布时间:2014/11/2 13:22:00
--  用表达式求季度
如何设置表达式,根据[日期列]的日期计算出[季度列]的季度?
--  作者:有点甜
--  发布时间:2014/11/2 14:06:00
--  

1、获取月;http://www.foxtable.com/help/topics/1285.htm

 

2、根据月份判断是第几季度

 

3、表达式比较麻烦,在datacolchanged编写代码就简单得多。


--  作者:ccbbdlzj
--  发布时间:2014/11/2 14:33:00
--  
求datacolchanged代码!
--  作者:有点甜
--  发布时间:2014/11/2 14:57:00
--  
If e.DataCol.name = "日期" Then
    If e.NewValue = Nothing Then
        e.DataRow("季度") = Nothing
    Else
        e.DataRow("季度") = iif(e.newValue.Month<=3,1,iif(e.newvalue.month<=6,2,iif(e.newvalue.month<=9,3,4)))
    End If
End If

--  作者:ccbbdlzj
--  发布时间:2014/11/2 15:14:00
--  
谢了!
--  作者:czy
--  发布时间:2014/11/2 15:49:00
--  

简单点也可以

 

e.DataRow("季度") = DatePart("q" , e.DataRow("日期"))