返回包含一個(gè)日期的Variant(Date),這一日期還加上了一段時(shí)間間隔。
語(yǔ)法
DateAdd(interval, number, date)
DateAdd函數語(yǔ)法中有下列命名參數:
| 部分 | 描述 |
|---|---|
| interval | 必要。字符串表達式,是所要加上去的時(shí)間間隔。 |
| number | 必要。數值表達式,是要加上的時(shí)間間隔的數目。其數值可以為正數(得到未來(lái)的日期),也可以為負數(得到過(guò)去的日期)。 |
| date | 必要。Variant(Date) 或表示日期的文字,這一日期還加上了時(shí)間間隔。 |
設置
interval參數具有以下設定值:
| 設置 | 描述 |
|---|---|
| yyyy | 年 |
| q | 季 |
| m | 月 |
| y | 一年的日數 |
| d | 日 |
| w | 一周的日數 |
| ww | 周 |
| h | 時(shí) |
| n | 分鐘 |
| s | 秒 |
說(shuō)明
可以使用DateAdd函數對日期加上或減去指定的時(shí)間間隔。例如,可以用DateAdd來(lái)計算距今天為三十天的日期;或者計算距現在為 45 分鐘的時(shí)間。
為了對date加上“日”,可以使用“一年的日數” (“y”),“日” (”d”) 或“一周的日數” (”w”)。
DateAdd函數將不返回有效日期。在以下實(shí)例中將 1 月31 日加上一個(gè)月:
DateAdd(m, 1, 31-Jan-95)上例中,DateAdd返回 1995 年 2 月 28 日,而不是 1995 年 2 月 31 日。如果date是 1996 年 1 月 31 日,則由于 1996 年是閏年,返回值是 1996 年 2 月 29 日。
如果計算的日期超前 100 年(減去的年度超過(guò)date中的年份),就會(huì )導致錯誤發(fā)生。
如果number不是一個(gè) Long 值,則在計算時(shí)取最接近的整數值來(lái)計算。
注意 DateAdd返回值的格式由Control Panel設置決定,而不是由傳遞到date參數的格式?jīng)Q定。
DateAdd 函數示例
本示例先取得一個(gè)日期,再用DateAdd函數顯示未來(lái)數月后的日期。
Dim FirstDate As Date '聲明變量。Dim IntervalType As StringDim

