弱问题一个！ ！！！！！！！！！！！！

Question

Dim overtime As Integer
oldt = "04-01-02 9:01:01"
nowt = "04-03-02 9:01:01"
limtt = DateAdd("d", 30, oldt)
overtime = DateDiff("d", oldt, limtt)overtime 的值为什么是  0

Answer 1

'要加上变量的声名:
dim oldt As Date
dim nowt As Date
dim limtt As Date

Answer 2

?????在我的机子里等于30：
Private Sub Command1_Click()
Dim overtime As Integer
oldt = "04-01-02 9:01:01"
nowt = "04-03-02 9:01:01"
limtt = DateAdd("d", 30, oldt)
overtime = DateDiff("d", oldt, limtt)
Print overtime
End Sub