ACCESS支援的時間日期函式2007年01月10日 16:01ACCESS支援的時間日期函式

pb8發表於2009-12-20

參考文章一:
找了半天,終於在微軟的網站找到了,對於做ACCESS資料庫開發人來說還是有點用處的,有時間的話我會把它翻譯成中文。(注:其中大部分對於Access是適用了,有些不行,使用前最好先在Access中試一下)。

DATE Returns the serial number of a particular date

DATEVALUE Converts a date in the form of text to a serial number

DAY Converts a serial number to a day of the month

DAYS360 Calculates the number of days between two dates based on a 360-day year

EDATE Returns the serial number of the date that is the indicated number of months before  or after the start date

EOMONTH Returns the serial number of the last day of the month before  or after a specified number of months

HOUR Converts a serial number to an hour

MINUTE Converts a serial number to a minute

MONTH Converts a serial number to a month

NETWORKDAYS Returns the number of whole workdays between two dates

NOW Returns the serial number of the current date and time

SECOND Converts a serial number to a second

TIME Returns the serial number of a particular time

TIMEVALUE Converts a time in the form of text to a serial number

TODAY Returns the serial number of today's date

WEEKDAY Converts a serial number to a day of the week

WEEKNUM Converts a serial number to a number representing where the week falls numerically with a year

WORKDAY Returns the serial number of the date before  or after a specified number of workdays

YEAR Converts a serial number to a year

YEARFRAC Returns the year fraction representing the number of whole days between start_date and end_date

 

 

參考文章二:

設定當前日期或時間。 Date ,Now, Time 
計算日期: DateAdd, DateDiff, DatePart 
返回日期: DateSerial, DateValue 
返回時間: TimeSerial, TimeValue 
設定日期或時間: Date, Time 
計時: Timer 
在幫助裡有~
---------------------------
夠全了!
---------------------------

Time 函式
      
返回一個指明當前系統時間的 Variant (Date)。
語法 
Time
說明
為了設定系統時間,請使用 Time 語句。Time 函式示例
本示例使用 Time 函式返回系統當前的時間。
Dim MyTime
MyTime = Time    ’ 返回系統當前的時間。

DateAdd 函式
      
返回包含一個日期的 Variant (Date),這一日期還加上了一段時間間隔。
語法 
DateAdd(interval, number, date)
DateAdd 函式語法中有下列命名引數:
部分 描述 
interval 必要。字串表示式,是所要加上去的時間間隔。 
number 必要。數值表示式,是要加上的時間間隔的數目。其數值可以為正數(得到未來的日期),也可以為負數(得到過去的日期)。 
date 必要。Variant (Date) 或表示日期的文字,這一日期還加上了時間間隔。 
設定
interval 引數具有以下設定值:
設定 描述 
==yyyy 年 
==q 季 
==m 月 
==y 一年的日數 
==d 日 
==w 一週的日數 
==ww 周 
==h 時 
==n 分鐘 
==s 秒 
說明
可以使用 DateAdd 函式對日期加上或減去指定的時間間隔。例如,可以用 DateAdd 來計算距今天為三十天的日期;或者計算距現在為 45 分鐘的時間。
為了對 date 加上“日”,可以使用“一年的日數” (“y”),“日” (”d”) 或“一週的日數” (”w”)。
DateAdd 函式將不返回有效日期。在以下例項中將 1 月31 日加上一個月:
DateAdd(m, 1, 31-Jan-95)
上例中,DateAdd 返回 1995 年 2 月 28 日,而不是 1995 年 2 月 31 日。如果 date 是 1996 年 1 月 31 日,則由於 1996 年是閏年,返回值是 1996 年 2 月 29 日。
如果計算的日期超前 100 年(減去的年度超過 date 中的年份),就會導致錯誤發生。
如果 number 不是一個 Long 值,則在計算時取最接近的整數值來計算。
注意   DateAdd 返回值的格式由 Control Panel設定決定,而不是由傳遞到date 引數的格式決定。
DateAdd 函式示例
本示例先取得一個日期,再用 DateAdd 函式顯示未來數月後的日期。 
Dim FirstDate As Date    ’ 宣告變數。
Dim IntervalType As String
Dim Number As Integer
Dim Msg
IntervalType = "m"    ’ "m"指定以“月份”作為間隔。
FirstDate = InputBox("Enter a date")
Number = InputBox("Enter number of months to add")
Msg = "New date: " & DateAdd(IntervalType, Number, FirstDate)
MsgBox Msg

--------------------------------------------------------------------------------

DateDiff 函式
      
返回 Variant (Long) 的值,表示兩個指定日期間的時間間隔數目。
語法
DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])
DateDiff 函式語法中有下列命名引數:
部分 描述 
interval 必要。字串表示式,表示用來計算date1 和 date2 的時間差的時間間隔 
Date1□date2 必要;Variant (Date)。計算中要用到的兩個日期。 
Firstdayofweek 可?gt;>V付ㄒ桓魴瞧詰牡諞惶斕某J H綣 從柚付ǎ 蛞孕瞧諶瘴 諞惶臁?nbsp;
firstweekofyear 可?gt;>V付ㄒ荒甑牡諞恢艿某J H綣 從柚付ǎ 蛞園 ?nbsp;1 月 1 日的星期為第一週。 
設定
interval 引數的設定值如下:
設定 描述 
yyyy 年 
q 季 
m 月 
y 一年的日數 
d 日 
w 一週的日數 
ww 周 
h 時 
n 分鐘 
s 秒 
firstdayofweek 引數的設定值如下:
常數 值 描述 
vbUseSystem 0 使用 NLS API 設定。 
vbSunday 1 星期日(預設值) 
vbMonday 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 來計算兩個日期之間相隔幾日,或計算從今天起到年底還有多少個星期。
為了計算 date1 與 date2 相差的日數,可以使用“一年的日數”(y) 或“日”(d)。當 interval 是“一週的日數”(w) 時,DateDiff 返回兩日期間的週數。如果 date1 是星期一,DateDiff 計算到 date2 為止的星期一的個數。這個數包含 date2 但不包含 date1。不過,如果 interval 是“周”(ww),則 DateDiff 函式返回兩日期間的“日曆周”數。由計算 date1 與 date2 之間星期日的個數而得。如果 date2 剛好是星期日,則 date2 也會被加進 DateDiff 的計數結果中;但不論 date1 是否為星期日,都不將它算進去。
如果 date1 比 date2 來得晚,則 DateDiff 函式的返回值為負數。
firstdayofweek 引數會影響使用時間間隔符號 “W” 或 “WW” 計算的結果。
如果 date1 或 date2 是日期文字,則指定的年份成為該日期的固定部分。但是,如果 date1 或 date2 用雙引號 (" ") 括起來,且年份略而不提,則在每次計算表示式 date1 或 date2 時,當前年份都會插入到程式碼之中。這樣就可以書寫適用於不同年份的程式程式碼。
在計算 12 月 31 日和來年的 1 月 1 日的年份差時,DateDiff 返回 1 表示相差一個年份,雖然實際上只相差一天而已。
DateDiff 函式示例
本示例使用 DateDiff 函式來顯示某個日期與今日相差幾天。
Dim TheDate As Date    ’ 宣告變數。
Dim Msg
TheDate = InputBox("Enter a date")
Msg = "Days from today: " & DateDiff("d", Now, TheDate)
MsgBox Msg

--------------------------------------------------------------------------------

DatePart 函式
      
返回一個包含已知日期的指定時間部分的 Variant (Integer)。
語法
DatePart(interval, date[,firstdayofweek[, firstweekofyear]])
DatePart 函式語法中有下列命名引數:
部分 描述 
interval 必要。字串表示式,是要返回的時間間隔。 
date 必要。要計算的 Variant (Date) 值。 
Firstdayofweek 可?gt;>V付ㄒ桓魴瞧詰牡諞惶斕某J H綣 從柚付ǎ 蛞孕瞧諶瘴 諞惶臁?nbsp;
firstweekofyear 可?gt;>V付ㄒ荒甑諞恢艿某J H綣 從柚付ǎ 蛞園 ?nbsp;1 月 1 日的星期為第一週。 
設定
interval 引數的設定值如下:
設定 描述 
yyyy 年 
q 季 
m 月 
y 一年的日數 
d 日 
w 一週的日數 
ww 周 
h 時 
n 分鐘 
s 秒 
firstdayofweek 引數的設定值如下:
常數 值 描述 
vbUseSystem 0 使用 NLS API 設定。 
vbSunday 1 星期日(預設值) 
vbMonday 2 星期一 
vbTuesday 3 星期二 
vbWednesday 4 星期三 
vbThursday 5 星期四 
vbFriday 6 星期五 
vbSaturday 7 星期六 
firstweekofyear 引數的設定值如下:
常數 值 描述 
vbUseSystem 0 使用 NLS API 設定。 
vbFirstJan1 1 從包含 1 月 1 日的星期開始(預設值)。 
vbFirstFourDays 2 從第一個其大半個星期在新的一年的一週開始。 
vbFirstFullWeek 3 從第一個無跨年度的星期開始。 
說明
DatePart 函式可以用來計算日期並返回指定的時間間隔。例如,可以使用DatePart 計算某個日期是星期幾或目前為幾點鐘。
firstdayofweek 引數會影響使用時間間隔符號 “W” 或 “WW” 計算的結果。
如果 date 是日期文字,則指定的年份成為該日期的固定部分。但是,如果 date 用雙引號 (" ") date 表示式時,當前年份都會插入到程式碼之中。
這樣就可以書寫適用於不同年份的程式程式碼

相關文章