DateAdd 函式

傳回已加上指定時間間隔的日期。

語法

DateAdd(interval, number, date)

引數：

  • Interval：必要。要新增之間隔的字串表示式。如需相關值，請參閱設定值區段。
  • Number：必要。要新增之間隔數量的數值表示式。數值表示式可以是正數 (未來的日期) 或是負數 (過去的日期)。
  • Date：必要。代表新增間隔日期的變異或文字。

設定值：間隔引數可具有下列值：

表格 11-9 間隔引數值

設定 描述
yyyy 年
q 季
m 月
d Day
w 星期幾
h Hour
n Minute
s Second

支援的日期格式：

  • MM/DD/YYYY
  • DD/MM/YYYY
  • YYYY-MM-DD
  • YYYY/MM/DD

支援的時間格式：

hh:mm:ss

備註

您可以使用 DateAdd 函式從某個日期新增或減去指定的時間間隔。例如，您可以使用 DateAdd 來計算從今天算起 10 天或從現在算起 45 分鐘的時間。若要將天數新增至日期，您可以使用天 ("d") 或星期幾 ("w")。

輸出日期格式是以系統的簡短日期格式為依據。

下列範例說明 DateAdd 函式的用法：

範例 1：

Dim MyDate, NewDate 
MyDate = "21/01/2025" 
NewDate = DateAdd("yyyy", 5, MyDate) 
'Output: 21-Jan-30

範例 2：

Dim MyDate, NewDate
MyDate = "21/01/2025"
NewDate = DateAdd("q", 1, MyDate)
'Output: 21-Apr-25

範例 3：

Dim MyDate, NewDate
MyDate = "21/01/2025"
NewDate = DateAdd("m", 2, MyDate)
'Output: 21-Mar-25

範例 4：

Dim MyDate, NewDate
MyDate = "21/01/2025"
NewDate = DateAdd("d", 10, MyDate)
'Output: 31-Jan-25

範例 5：

Dim MyDate, NewDate
MyDate = "21/01/2025"
NewDate = DateAdd("w", 4, MyDate)
'Output: 25-Jan-25

範例 6：

Dim MyDate, NewDate
MyDate = "21/01/2025 14:40:00"
NewDate = DateAdd("h", 5, MyDate)
'Output: 21-Jan-25 7:40:00 PM

範例 7：

Dim MyDate, NewDate
MyDate = "21/01/2025 14:40:00"
NewDate = DateAdd("n", 5, MyDate)
'Output: 21-Jan-25 2:45:00 PM

範例 8：

Dim MyDate, NewDate
MyDate = "21/01/2025 14:40:00"
NewDate = DateAdd("s", 5, MyDate)
'Output: 21-Jan-25 2:40:05 PM