日期格式的问题？？？

Question

Dim WorkDate as StringWorkDate=Format(Now, "yyyy-mm-dd hh:mm:ss")MsgBox WorkDate

Answer 1

junwhj(junwhj.myrice.com) 是对的

Answer 2

对不起，我想是我没有表达清楚。WorkDate=Format(Now, "yyyy-mm-dd hh:mm:ss")按上所格式，如果是当前时间是2002-10-12 15:00:00
那用msgbox WorkDate时也应该显示为2002-10-12 15:00:00对吧。可是显示的确成了这个样子02-10-12 15:00:00。。不知道为什么？？？

Answer 3

我的理解是：
如果WorkDate为日期型，那么Format(Now, "yyyy-mm-dd hh:mm:ss")函数的返回值是丘"2002-10-12 15:00:00"，而把它赋值给WorkDate后如果系统的日期格式是"02-10-12 15:00:00"，那么WorkDate将会变成"02-10-12 15:00:00"，但如果WorkDate是字符型，就没有这一变化，请试试下面的程序：
Dim WorkDate As Date
Dim str As String
str = Format(Now, "yyyy-mm-dd hh:mm:ss")
WorkDate = Format(Now, "yyyy-mm-dd hh:mm:ss")
MsgBox str & vbCrlf WorkDate

Answer 4

： EpopeeLei(午夜狂编) 一语话惊醒我梦中人，在我的思维里我老以为只要给WorkDate=Format(Now, "yyyy-mm-dd hh:mm:ss")。就必然是四位数代替年、月(2002-10-12 15:00:00)..而勿略了Date类型与String类型的天囊之别谢谢……给份。