当前位置:DOS资源站资料中心VBS脚本 → vbs代码得到本月的最后一天

vbs代码得到本月的最后一天

减小字体 增大字体 作者:佚名  来源:本站整理  发布时间:2008-4-5 0:05:13

Dim dt1, dt2
dt1 = Date
dt1 = CDate(Year(dt1) & "-" & Month(dt1) & "-1") ' 得到本月第一天
dt2 = DateAdd("d", -1, dt1) ' 得到上个月最后一天
MsgBox dt2