以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]日期格式  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=28720)

--  作者:shenzhi
--  发布时间:2013/2/16 10:14:00
--  [求助]日期格式
请问在狐表中如何将2013-02-16的日期格式转换或显示为16-Feb-2013的英文的格式?

--  作者:lin_hailun
--  发布时间:2013/2/16 10:28:00
--  
 可以看看这个。

http://www.foxtable.com/help/topics/0362.htm

--  作者:lin_hailun
--  发布时间:2013/2/16 10:33:00
--  
 获取某个月份的英文简写。

Dim  myDTFI As object =  new   System.Globalization.CultureInfo("en-US", False).DateTimeFormat
msgbox(myDTFI.GetAbbreviatedMonthName(1))

--  作者:shenzhi
--  发布时间:2013/2/16 10:39:00
--  
 已经看过,但全部是转换为中文的日期,有没有英文的例子可以借鉴?
--  作者:shenzhi
--  发布时间:2013/2/16 10:51:00
--  
以下是引用lin_hailun在2013-2-16 10:33:00的发言:
 获取某个月份的英文简写。

Dim  myDTFI As object =  new   System.Globalization.CultureInfo("en-US", False).DateTimeFormat
msgbox(myDTFI.GetAbbreviatedMonthName(1))
不错稍加改造可以实现,可否考虑将英文格式设置到日期格式中呢,这样更方便,就像Excel中那样!
--  作者:lin_hailun
--  发布时间:2013/2/16 10:53:00
--  
 自己拼凑一个呗。

Dim d As Date = Date.Today
Dim myDTFI As object =  new   System.Globalization.CultureInfo("en-US", False).DateTimeFormat
Dim month As String = myDTFI.GetAbbreviatedMonthName(d.Month)
msgbox(d.Day & "-" & month & "-" & d.Year)