请教关于时间处理的问题！！！！！！！！！！！！！！！！！！！！！！！！！！！

Question

假设某个系统时间，怎样用简单的办法得到比这个系统时间早3分钟的那个时刻？我感觉这个算法会好负责，不但和时间有关还和日期有关？请指教！
比如2003.7.2 12:00:10,应该返回2003.7.2 11:57:10.

Answer 1

Option ExplicitPrivate Sub Command1_Click()
    
    Dim mydate As Date
    mydate = DateAdd("n", -3, Now)
    MsgBox mydate
End Sub
就行了

Answer 2

●DateAdd 日期加法得日期
●用法：传回日期 = DateAdd(日期间隔种类, 增加量, 日期) 日期间隔种类
yyyy  年  
q     季  
m     月  
y     太阳日  
d     号  
w     星期  
ww    周  
h     时  
n     分  
s     秒