日期格式，在线等待。

Question

使用Format(Date, "mm/dd")得到的是“xx月xx日”，怎样才能得到“xx-xx”或者“xx/xx”。我要生成的excel档是给老外看的，请大家帮忙，谢谢。

Answer 1

跟系统设置有关的.
我这里就是xx-xx

Answer 2

最简单的方法是在输出的值前加上"'" ,如：sheet.cell(1,1)="'" & format(myDate,"mm/dd")
"'"是左对齐。不过也是这个不是最好的方法:)

Answer 3

Format(Date, "MM/dd")
MM要大写。

Answer 4

TheDate = month(Date) & "-" & day(Date)

Answer 5

同意楼上所说。“控制面板”—>“区域选项”—>“常规”—>“您的区域设置（位置）”—>选择英语地区的就可以了。

Answer 6

大不了使用 DatePart
msgbox  DatePart("m",now) & "-" & DatePart("d",now)

Answer 7

谢谢大家，问题自己解决了。设置控制面板会影响其他程序。直接使用vb在程序里面设置excel表格的格式为时间格式，然后执行对应的操作，

Answer 8

用Format(Now, "mm-dd")
生成的格式即为“xx-xx”，而且与系统的时间格式设置无关。