Office中国论坛/Access中国论坛

标题: 如果算出今年的第一天? [打印本页]

作者: petrelai 时间: 2004-4-10 04:41
标题: 如果算出今年的第一天?
如题

作者: paul16 时间: 2004-4-10 04:49
? 很有意思的问题！

作者: petrelai 时间: 2004-4-10 04:55
今年的第一天是这这样算的: Me.开始日期1.Object.Value = CDate(Format(Date, "yyyy-1-1"))
但又不会算去年的第一天,或最后一天了.各位,请指教!

作者: petrelai 时间: 2004-4-10 05:09
嘻,真的很有意思:上一年的第一天,和最后一天,有点来硬的感觉,不过也是对的话
Me.开始日期1.Object.Value = CDate(Format((Year(Date) - 1 & "-" & "1" & "-" & "1"), "yyyy-1-1"))
Me.结束日期1.Object.Value = CDate(Format((Year(Date) - 1 & "-" & "12" & "-" & "31"), "yyyy-12-31"))

[此贴子已经被作者于2004-4-9 21:10:17编辑过]

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)