麻豆小视频在线观看_中文黄色一级片_久久久成人精品_成片免费观看视频大全_午夜精品久久久久久久99热浪潮_成人一区二区三区四区

首頁 > 編程 > VBScript > 正文

使用VBS獲取當前日期的前一天 并修正輸出格式

2020-07-26 11:47:08
字體:
來源:轉載
供稿:網友

獲取當前日期方法一:

復制代碼 代碼如下:

Currentdate1=date()
msgbox Currentdate1

獲取當前日期方法二:

復制代碼 代碼如下:

Currentdate2=year(Now)&"-"&Month(Now)&"-"&day(Now)
msgbox Currentdate2

補充一個:如果想獲取的日期前面是1位數的前面補0的寫法,例如 2016年5月16,如果目錄是2016516不如20160516更好

復制代碼 代碼如下:

ystr=year(Now)
mstr=Month(Now)
if len(mstr)<2 then mstr="0"&mstr
dstr=day(Now)
dateml=ystr&mstr&dstr
msgbox(dateml)

獲取當前時間:

復制代碼 代碼如下:

CurrentTime=Hour(Now)&":"&Minute(Now)&":"&Second(Now)
m = "當前時間"& CurrentTime
msgbox m

windows下使用VBS取當前日期的前一天,并修正輸出格式

my_date1 = DateAdd("d",-1,date)

作用:取當前時間的前一天(當前時間以系統時間為準)并將結果賦予變量my_date1
my_date2 = DatePart("yyyy",my_date1) & "-" & Right("0" & DatePart("m",my_date1), 2) & "-" & Right("0" & DatePart("d",my_date1),2)

作用:不考慮系統設定的時間格式(默認為YYYY/M/D),修改輸出時間格式為YYYY-MM-DD,并將結果賦予變量my_date2

查看輸出的時間:

msgbox my_date1
msgbox my_date2

以上腳本在windows2003、2008下測試通過

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 精品一区二区亚洲 | 午夜国产在线观看 | 久久精品中文字幕一区二区 | 国产九九热 | xnxx 美女19 | 国产成年免费视频 | 日韩激情一区 | 国产高清美女一级毛片久久 | 91短视频网页版 | 日韩视频一 | 欧美精品一区二区三区在线播放 | 亚洲国产精久久久久久久 | 久久久久久久久免费 | 在线观看免费毛片视频 | 欧美日韩综合视频 | 欧美人xx| 成年人高清视频在线观看 | 天天看天天摸天天操 | 欧美中文字幕一区二区三区亚洲 | 在线97视频| 91九色视频在线播放 | 亚洲网站在线 | 久久免费视频8 | 国产精品99久久久久久久 | xp123精品视频 | 久久思思爱| jizzyouxxxx| 亚洲午夜天堂吃瓜在线 | 羞羞视频免费网站男男 | 日本网站一区 | 国产成人高清在线观看 | 欧美a久久 | 日本网站在线看 | 全黄裸片武则天艳史 | 嫩呦国产一区二区三区av | 免费网址黄 | 成年人激情在线 | 91小视频在线观看免费版高清 | 久精品久久 | 久久久久久久一区二区三区 | 韩国十九禁高潮床戏在线观看 |