水晶报表Crystal Reports 月份实现英文简写

1、先将要显示的日期字段拖到报表上；

2、新建自定义函数EngMonth，输入以下代码:

Function (numbervar x)

switch (x=1,'Jan',x=2,'Feb',x=3,'Mar',x=4,'Apr',x=5,'May',x=6,'Jun',x=7,'Jul',x=8,'Aug',x=9,'Sep',x=10,'Oct',x=11,'Nov',x=12,'Dec')

3、新建公式字段EngToday，输入以下代码：

totext(Day (日期变量),"00",0)+"-"

+EngMonth(Month(日期变量))+"-"+Totext(Year(日期变量),"0000",0)

4、将新建的公式字EngToday拖至报表上相应的位置。

5、预览结果如下：

6、如果要显示月份的英文全称，只需将第2步中的英文简写改为英文全称即可。