我是靠谱客的博主 愤怒跳跳糖,最近开发中收集的这篇文章主要介绍使用VBS获取当前日期的前一天 并修正输出格式,觉得挺不错的,现在分享给大家,希望可以做个参考。

概述

获取当前日期方法一:

复制代码 代码如下:

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下测试通过

最后

以上就是愤怒跳跳糖为你收集整理的使用VBS获取当前日期的前一天 并修正输出格式的全部内容,希望文章能够帮你解决使用VBS获取当前日期的前一天 并修正输出格式所遇到的程序开发问题。

如果觉得靠谱客网站的内容还不错,欢迎将靠谱客网站推荐给程序员好友。

本图文内容来源于网友提供,作为学习参考使用,或来自网络收集整理,版权属于原作者所有。
点赞(91)

评论列表共有 0 条评论

立即
投稿
返回
顶部