VBS中怎么获取当前日期的前一天-创新互联

本篇文章为大家展示了VBS中怎么获取当前日期的前一天 ，内容简明扼要并且容易理解，绝对能使你眼前一亮，通过这篇文章的详细介绍希望你能有所收获。

10年积累的成都网站制作、成都网站建设经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先网站设计后付款的网站建设流程，更有美兰免费网站建设让你可以放心的选择与我们合作。

获取当前日期方法一：

 代码如下:

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

上述内容就是VBS中怎么获取当前日期的前一天 ，你们学到知识或技能了吗？如果还想学到更多技能或者丰富自己的知识储备，欢迎关注创新互联行业资讯频道。

当前文章：VBS中怎么获取当前日期的前一天-创新互联
标题来源：http://scjbc.cn/article/dgdecs.html