在程序開發(fā)的時(shí)候，我們經(jīng)常會(huì)用到將系統(tǒng)日期轉(zhuǎn)換成“0000-00-00”格式的日期，對(duì)于頻繁使用的代碼，可以封裝成一個(gè)自定義函數(shù)來調(diào)用，小編簡單整理了一下，以備不時(shí)之需，也希望能夠幫助需要幫助的人。內(nèi)容如下：
Function NowDate() ' 將當(dāng)前日期轉(zhuǎn)換成“2018-04-01”的格式，在其他地方引用時(shí)，直接使用：NowDate()即可
nowyear = year(date())
nowmonth = month(date())
nowday = day(date())
if len(nowmonth)<2 then
nowmonth="0"&nowmonth
end if
if len(nowday)<2 then
nowday="0"&nowday
end if
nowdate = nowyear&"-"&nowmonth&"-"&nowday
End Function
Function TypeDate(str) ' 將指定日期轉(zhuǎn)換成“2018-04-01”的格式，在其他地方引用時(shí)，直接使用：TypeDate(str)即可
nowyear = year(str)
nowmonth = month(str)
nowday = day(str)
if len(nowmonth)<2 then
nowmonth="0"&nowmonth
end if
if len(nowday)<2 then
nowday="0"&nowday
end if
TypeDate = nowyear&"-"&nowmonth&"-"&nowday
End Function
