请请高手:如何把这样的数据变为日期?

ouxingwang

请请高手:如何把这样的数据变为日期?

代码:

假设当前系统日期为:2004-10-5

y1 = DatePart("yyyy", Date)

m1 = DatePart("m", Date)

d1 = DatePart("d", Date)

这样y1=2004

     m1=10

     d1=5

现在我想把10-3=7,即:

     y1=2004

     m1=7

     d1=5

请问高手:如何把y1、m1、d1组成一个日期型,把它赋给一个日期型变量oi,使得oi的值为：2004-7-5

wanshan

试一下：cdate("y1" & "-" & "m1" & "-" & "d1")，也许可以！（系统的日期格式为yyyy-m-d）！如果只是为了减少三个月，可以利用另外一个函数：DateAdd(m, -3, date)更多可以参考：http://www.accfans.net/BBS/Announce/Announce.asp?BoardID=107&ID=114

wangxuefeng

看看这个例子