如何在vb6或vba中找到上个月？

Question

我在vb中写了一个代码来查找上个月.但我没有得到我期待的输出.这是我的代码:

a=Format$(Now, "mm")-1 

但我希望输出2位数,如果上个月是1月那么输出应该是01不仅1

请帮帮我.

Answer 1

使用DateAdd函数.进一步来说:

date d = DateAdd("m", -1, Now)
a = Format(d, "mm")