DateDiff 函數

重要:  本文係由機器翻譯而成,請參閱免責聲明。本文的英文版本請見這裡,以供參考。

會傳回 Variant (Long),指定兩個指定日期之間的時間間隔數目。

請參閱部分範例

語法

DateDiff 間隔日期 1、 date2 [firstdayofweek] [firstweekofyear] )

DateDiff函數語法具有下列引數︰

提示: 在 Access 2010 中,[運算式建立器都有 IntelliSense,,因此您可以查看自己的運算式所需要的引數。

引數

說明

間隔

所需。是的用於計算date1date2之間的差異的時間間隔的字串運算式。

日期 1 date2

所需。variant(日期)。您要用來計算兩個日期。

firstdayofweek

選用。常數 ,指定一週的第一天。如果未指定,則假設星期日。

firstweekofyear

選用。指定一年的第一週的常數。如果未指定的第一週是其值假定為月 1 日發生的週。


設定

間隔 引數具有這些設定︰

設定

描述

yyyy

q

m

月份

y

一年裏的第幾天

d

日期

w

工作日

ww

h

n

分鐘

s


頁面頂端

Firstdayofweek 引數的這些設定︰

常數

描述

vbUseSystem

0

使用 [NLS API 設定。

使用

1

星期日 (預設值)

2

星期一

vbTuesday

3

星期二

vbWednesday

4

星期三

vbThursday

5

星期四

vbFriday

6

星期五

vbSaturday

7

星期六


常數

描述

vbUseSystem

0

使用 [NLS API 設定。

vbFirstJan1

1

開始的週年 1 月 1 發生的 (預設)。

vbFirstFourDays

2

至少有四個天中新的一年的第一週的開頭。

vbFirstFullWeek

3

開頭為一年的第一個完整的週。


註解

若要決定兩個日期之間有多少的指定的時間間隔,您可以使用DateDiff函數。例如,您可能會使用DateDiff來計算兩個日期或今天與年度的結尾之間的週數之間的天數。

若要計算date1date2之間的天數,您可以使用 [年 ("y") 中的日或天 ("d")。當間隔Weekday (「 w 」), DateDiff會傳回兩個日期之間的週數。日期 1落在星期一, DateDiff會計算星期一,直到date2數目。它會計算date2日期 1]。如果間隔週 (「 全球 」),不過, DateDiff函數會傳回兩個日期之間的行事曆週數。它會計算date1date2之間的每週日數。DateDiff計算日期 2 ,其落星期日;但是,它不會計算date1,即使其會落在星期日。

如果日期 1是指稍後時間比date2DateDiff函數會傳回數的一個負數。

Firstdayofweek 引數會影響您使用的 「 w 」 和 「 全球 」 間隔符號的計算。

如果date1date2日期文字,指定的年份會成為該日期的永久部分。不過, date1date2以雙引號括住 (「 」),且省略年,每次date1date2評估此運算式會插入目前的年份程式碼。如此可讓您可以撰寫程式碼,可在不同的年份。

比較年 12 月 31 日 1 年 1 月、 DateDiff年 (「 yyyy") 會傳回 1,即使已過某一天。

附註: Date1date2,若行事曆] 屬性設定為 [西曆,必須提供日期、 西曆做。回曆行事曆時,所提供的日期必須是回曆。

頁面頂端

範例

使用運算式中 DateDiff 函數    您可以使用運算式的地方,您可以使用DateDiff函數。例如,假設您有您用來滿足客戶訂單的表單。在 [訂單] 資料表中,您會有名為 ReceiveBefore 包含日期的客戶需要接收順序的欄位。您可以在表單上的 [文字] 方塊中使用DateDiff函數,若要顯示的順序必須提供剩的天數。

您設定 [文字] 方塊的 [控制項資料來源] 的屬性,如下所示假設花隨附的任何順序的十天:

= DateDiff("d", Now(), [Orders].[ReceiveBefore])-10

當您開啟表單表單檢視] 中時,[文字] 方塊會顯示的順序必須提供剩的天數。如果沒有小於 10 天左之前客戶需要接收順序,[文字] 方塊中的數字為負數,且指出幾天最遲順序會立即商品銷售並運送如果。

VBA 程式碼中使用DateDiff函數   

附註: 下列範例示範如何在 Visual Basic for Applications (VBA) 模組中使用此函數。 如需使用 VBA 的詳細資訊,請在 [搜尋] 旁的下拉式清單中選取 [開發人員參考],並在 [搜尋] 方塊中輸入一個或多個字詞。

此範例使用DateDiff函數來顯示特定的日期和今天之間的天數。

Dim TheDate As Date    ' Declare variables.
Dim Msg
TheDate = InputBox("Enter a date")
Msg = "Days from today: " & DateDiff("d", Now, TheDate)
MsgBox Msg

附註: 機器翻譯免責聲明︰本文係以電腦系統翻譯而成,未經人為介入。Microsoft 提供此等機器翻譯旨在協助非英語系使用者輕鬆閱讀 Microsoft 產品、服務及技術相關內容。基於本文乃由機器翻譯而成,因此文中可能出現詞辭、語法、文法上之錯誤。

擴展您的技能
探索訓練
優先取得新功能
加入 Office 測試人員

這項資訊有幫助嗎?

感謝您的意見反應!

感謝您的意見反應! 我們將協助您與其中一位 Office 支援專員連絡以深入了解您的意見。

×