uj5u.com熱心網友回復：
好好學習，認真做題。uj5u.com熱心網友回復：
DateSerial 函式
回傳包含指定的年、月、日的 Variant (Date)。
語法
DateSerial(year, month, day)
DateSerial 函式語法有下列的命名引數：
部分 描述
year 必要；Integer。從 100 到 9999 間的整數，或一數值運算式。
month 必要；Integer。任何數值運算式。
day 必要；Integer。任何數值運算式。
說明
為了指定某個日期，如 1991 年 12 月 31 日，DateSerial 函式中的每個引數的取值范圍應該是可接受的；即，日的取值范圍應在 1-31 之間，而月的取值范圍應在 1-12 之間。但是，當一個數值運算式表示某日之前或其后的年、月、日數時，也可以為每個使用這個數值運算式的引數指定相對日期。
以下示例中使用了數值運算式代替絕對日期。這里，DateSerial 函式回傳 1990 年 8 月 1 日的 十 年 (1990 - 10) 零兩個月 (8 - 2) 又一天 (1 - 1) 之前的日期；換句話說，就是 1980 年 5 月 31 日。
DateSerial(1990 - 10, 8 - 2, 1 - 1)
year 引數的數值若介于 0 與 29 之間，則將其解釋為 2000–2029年，若介于 30 和 99 之間則解釋為1930–1999年。而對所有其它 year 引數，則請用四位數值表示（如 1800）。
當任何一個引數的取值超出可接受的范圍時，它會適時進位到下一個較大的時間單位。例如，如果指定了 35 天，則這個天數被解釋成一個月加上多出來的日數，多出來的日數將由其年份與月份來決定。如果一個引數值超出 -32，768 到 32，767 的范圍，就會導致錯誤發生。
DateSerial 函式示例
本示例使用 DateSerial 函式來將指定的年月日轉換為 Date 型別的運算式。
Dim MyDate
' MyDate 的值為 February 12，1969， Date 型別。
MyDate = DateSerial(1969, 2, 12) ' 回傳日期。
轉載請註明出處，本文鏈接：https://www.uj5u.com/gongcheng/73789.html
標籤：VBA