日期格式返回错误的值和格式答案

【问题标题】：Date formatting returning wrong value and format日期格式返回错误的值和格式
【发布时间】：2014-03-11 19:51:40
【问题描述】：

我遇到了一个奇怪的问题。由于某种原因，我无法理解这个简单的一小段代码返回了错误的值。它将于 1985 年 3 月 8 日回归。如果我将格式设置为“mm/dd/yy”，它会返回正确的日期，即我不想要的格式。（就像一个注释，如果我在格式中使用“mm”，它返回 1/2/1900，如果我使用“mmdd”，它返回 11/6/1900。）这之前工作正常，所以我假设必须变了，但我不知道是什么。

任何帮助将不胜感激。

Sub testdate()    
Dim today As Date
today = Format(Now, "mmddyy")    
MsgBox today    
End Sub

【问题讨论】：

使用Dim today As String 代替Dim today As Date。或者直接使用MsgBox Format(Now, "mmddyy") 而不是MsgBox today
啊哈，谢谢，我应该看到的。

标签： vba date excel

【解决方案1】：

Sub testdate()
    Dim todayy As String
    todayy = Format(Now, "mmddyy")
    MsgBox todayy
End Sub

将显示031114

【讨论】：