不是有个函数是DateAdd的吗？我写了下面这个代码，为什么会出错呢？
Private Sub Form_Click()
Dim ti As Data
ti = DateAdd("ww", 2, #1/7/1984#)
Print ti
End Sub

呵呵，我会吸取教训的