时间加两年怎样计算,该如何解决

时间加两年怎样计算
表里有一个开始时间，一个结束时间，都是datetime型
窗体上用了DTPicker输入一个开始时间
结束时间为开始时间加两年
比如：开始时间2001-3-3，结束时间自动计算为2003-3-2(日期要减一天)
然后把两个时间写入表中

请问这个过程怎样写？

[解决办法]
Private Sub Command1_Click()
Debug.Print DateAdd( "yyyy ", 2, Now)
End Sub
[解决办法]
Private Sub Command1_Click()
Debug.Print DateAdd( "yyyy ", 2, Now)
End Sub