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

Question

我有一个奇怪的问题。由于某种原因，我无法理解这个简单的一点代码返回错误的值。它将于1985年3月8日返回。如果我将格式化为＆＃34; mm / dd / yy＆＃34;它会返回正确的日期，即我不想要的格式。 （只是作为一个注释，如果我使用＆＃34; mm＆＃34;在格式化中它返回1/2/1900，如果我使用＆＃34; mmdd＆＃34;它返回11/6/1900。）这是之前工作正常，所以我认为某些事情必须改变，但我不知道是什么。

任何帮助将不胜感激。

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

Answer 1

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

将显示 031114