LibreOffice 24.8 Help
Returns a Date value for a specified year, month, and day.
DateSerial(year, month, day)
日期
Year:指示年份的整型表示式。0 到 99 之間的所有數值都會被解譯為 1900-1999 之間的年份。而對於此範圍之外的年份,必須輸入完整的四位數位。
Month:整型表示式,指示指定年份中的某月。可接受的範圍是 1-12。
Day: 整數表述式,可表示指定月份的日期。可接受的範圍為 1-31。當您為月份輸入個小於 31 日,但卻不存在的日期時不會回傳錯誤。
DateSerial 函式傳回 1899 年 12 月 30 日與給定日期之間相差的天數。因此,可以使用此函式計算兩個日期之間相差的天數。
DateSerial 函式傳回的資料類型是變體型,其 VarType 為 7,即 Date。在程式內部,該值作為雙精度型數值儲存。因此,當給定日期為 1900 年 1 月 1 日時,傳回值是 2。負值表示給定的日期早於 1899 年 12 月 30 日 (不包含在內)。
如果定義的日期超出了可接受的範圍,LibreOffice Basic 將傳回一則錯誤訊息。
由於您定義 DateValue 函式為包含日期的字串,因此 DateSerial 函式將每個參數 (year、month、day) 作為單獨的數值型表示式進行演算。
Sub ExampleDateSerial
Dim lDate As Long
Dim sDate As String
lDate = DateSerial(1964, 4, 9)
sDate = DateSerial(1964, 4, 9)
msgbox lDate REM 傳回 23476
msgbox sDate REM 傳回 04/09/1964
End Sub