DateSerial 函數

對于指定的年、月、日，返回 Date 子類型的 Variant。

DateSerial(year, month, day)

Arguments

Year

從 100 到 9999 之間的數字或數值表達式。

Month

任意數值表達式。

Day

任意數值表達式。

說明

要指定日期，如 1991 年 12 月 31 日，DateSerial 函數中每個參數的取值范圍都應該是可接受的；即日的取值應在 1 和 31 之間，月的取值應在 1 和 12 之間。但是，也可以使用表示某日之前或之后的年、月、日數目的數值表達式為每個參數指定相對日期。

以下樣例中使用了數值表達式代替絕對日期。在這里，DateSerial 函數返回 1990 年 8 月 1 日之前十年 (1990 - 10) 零兩個月 (8 - 2) 又一天 (1 - 1) 的日期：即 1980 年 5 月 31 日。

Dim MyDate1, MyDate2MyDate1 = DateSerial(1970, 1, 1)         ' Returns January 1, 1970.MyDate2 = DateSerial(1990 - 10, 8 - 2, 1 - 1)   ' Returns May 31, 1980.

對于 year 參數，若取值范圍是從 0 到 99，則被解釋為 1900 到 1999 年。對于此范圍之外的 year 參數，則使用四位數字表示年份（例如 1800 年）。

當任何一個參數的取值超出可接受的范圍時，則會適當地進位到下一個較大的時間單位。例如，如果指定了 35 天，則這個天數被解釋成一個月加上多出來的日數，多出來的日數取決于其年份和月份。但是如果參數值超出 -32,768 到 32,767 的范圍，或者由三個參數指定（無論是直接還是通過表達式指定）的日期超出了可以接受的日期范圍，就會發生錯誤。