Crystal Reports日期格式

Question

如何将日期格式设置为像1st 2nd 3rd一样打印日期等等？谢谢

Answer 1

我找到了解决方案。

NumberVar DayIn := Day (PrintDate); 
Totext (DayIn , 0) 
& (if DayIn in 4 to 20 then 'th' else 
if remainder (DayIn , 10) = 1 then 'st' else 
if remainder (DayIn , 10) = 2 then 'nd' else 
if remainder (DayIn , 10) = 3 then 'rd' else 'th') 

从http://www.kenhamady.com/news0910.shtml