生成一个数据类型数据
Dim objDate as Date
Dim objDtNow as Date
objDate = New Date(2015,4,20)
日期类型相加减(减的话用负数)
objDtNow.AddDays(3)
objDtNow.AddMonths(10)
objDtNow.AddMinutes(2)
objDtNow.AddYears(-2)
生成一个数据类型数据
Dim objDate as Date
Dim objDtNow as Date
objDate = New Date(2015,4,20)
日期类型相加减(减的话用负数)
objDtNow.AddDays(3)
objDtNow.AddMonths(10)
objDtNow.AddMinutes(2)
objDtNow.AddYears(-2)