for k = date() to date()+4
...
next
但如果我希望循环反向,则以下两种方法都不起作用:
for k = date()+4 to date()
for k = date() to date()-4 step-1
他们只是给出一个空循环。
有办法做到这一点吗?我需要按降序排列日期。
答案 0 :(得分:1)
真的吗?,你的最后一个例子适合我。 本来会发布这个评论,但想要显示输出工作,你的代码似乎没问题。
Dim k
For k = Date() To Date() - 4 Step - 1
WScript.Echo k
Next
输出:
21/03/2016
20/03/2016
19/03/2016
18/03/2016
17/03/2016