求助！Access英文日期（已解決）

wuqiong1129

報(bào)表里的一個(gè)控件為"Date()"顯示當(dāng)前日期，但是日期的格式希望用英文表達(dá)，比如2017/12/22，表達(dá)出來為“22nd Dec 2017”，其他都好搞定，現(xiàn)在的問題是“日”，需要“*”&"1"表達(dá)為“*1st”，"*"&"2"表達(dá)為“*2nd”，“*”&"3"表達(dá)為"*3rd"，3以上的用"th"，不知道該怎么設(shè)置，求支招！
之前在網(wǎng)上查了一下，用mid和mod解決了。
具體為：“=Format(Date(),"dd") & Mid("thstndrdthththththth",(DatePart("d",Date()) Mod 10)*2+1,2)”這樣可以完美解決“日”表達(dá)，如果要加上年月只需要在文本框里后面用“&”連接“Format(Date(),"mmm yyyy")”
比如需要表達(dá)“2017/12/25”為“25th Dec 2017”的話只需要在文本框?qū)懭搿?Format(Date(),"dd") & Mid("thstndrdthththththth",(DatePart("d",Date()) Mod 10)*2+1,2) & " " & Format(Date(),"mmm yyyy")”
注：該表達(dá)式表達(dá)為當(dāng)前系統(tǒng)日期


希望對有同樣需要的朋友幫助！

wuqiong1129

求高手支招！

admin

自定義一個(gè)函數(shù)�？梢钥催@里
http://www.mzhfr.cn/access-graph/502.html

wuqiong1129

admin 發(fā)表于 2017-12-23 11:11
自定義一個(gè)函數(shù)。可以看這里
http://www.mzhfr.cn/access-graph/502.html

謝謝，我剛看見，之前在網(wǎng)上查了一下，用mid和mod解決了。具體為“=Format(Date(),"dd") & Mid("thstndrdthththththth",(DatePart("d",Date()) Mod 10)*2+1,2)”這樣可以完美解決“日”表達(dá)，如果要加上年月只需要在文本框里后面用“&”連接“Format(Date(),"mmm yyyy")”，比如需要表達(dá)“2017/12/25”為“25th Dec 2017”的話只需要在文本框?qū)懭搿?Format(Date(),"dd") & Mid("thstndrdthththththth",(DatePart("d",Date()) Mod 10)*2+1,2) & " " & Format(Date(),"mmm yyyy")”注：該表達(dá)式表達(dá)為當(dāng)前系統(tǒng)日期