日期和時(shí)間轉(zhuǎn)換

作者：金字塔來(lái)源：cxh99.com 發(fā)布時(shí)間：2015年04月19日

咨詢內(nèi)容： r=Dates=Time這個(gè)得到的是2015-01-17.15:54:16這種格式。要把它轉(zhuǎn)換成20141202.133246格式我用 r = Format(Date, "yyyymmdd") s = Format(time, "hhmmss") 這種轉(zhuǎn)換提示類型不匹配
金字塔客服： Set tf = fso.CreateTextFile("c:\ibt_order\IF1502.txt", True)我想在IF1502后面加上日期和時(shí)間如何加呀
用戶回復(fù)： 就是加個(gè)日期時(shí)間的變量
網(wǎng)友回復(fù)： NamedFormat 參數(shù)可以有以下值：
常數(shù) 值描述 vbGeneralDate 0 顯示日期和/或時(shí)間。如果有日期部分，則將該部分顯示為短日期格式。如果有時(shí)間部分，則將該部分顯示為長(zhǎng)時(shí)間格式。如果都存在，則顯示所有部分。 vbLongDate 1 使用計(jì)算機(jī)區(qū)域設(shè)置中指定的長(zhǎng)日期格式顯示日期。 vbShortDate 2 使用計(jì)算機(jī)區(qū)域設(shè)置中指定的短日期格式顯示日期。 vbLongTime 3 使用計(jì)算機(jī)區(qū)域設(shè)置中指定的時(shí)間格式顯示時(shí)間。 vbShortTime 4 使用 24 小時(shí)格式 (hh:mm) 顯示時(shí)間。

后面已經(jīng)制定了時(shí)間格式,按照計(jì)算機(jī)的設(shè)置來(lái)的

例如FormatDateTime(Date,2)