主题：用表达式求季度

如何设置表达式,根据[日期列]的日期计算出[季度列]的季度?

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

 

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

 

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

求datacolchanged代码!

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

谢了!

简单点也可以

 

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