DateSerial Function

Returns a Date value for a specified year, month, and day.

Syntax:


DateSerial (year, month, day)

Return value:

កាលបរិច្ឆេទ

Parameters:

ឆ្នាំ ៖ កន្សោមចំនួនគត់ ដែលចង្អុលបង្ហាញពីឆ្នាំ ។ តម្លៃទាំងអស់ចន្លោះ ០ និង ៩៩ ត្រូវបានបកប្រែជាឆ្នាំ 1900-1999 ។ សម្រាប់ឆ្នាំដែលស្ថិតនៅក្រៅពីជួរនេះ អ្នកត្រូវបញ្ចូលទាំងអស់បួនតួលេខ ។

Month ៖ កន្សោមចំនួនគត់ ដែលចង្អុលប្រាប់ពីខែនៃឆ្នាំដែលបានបញ្ជាក់ ។ ជួរដែលអាចទទួលយកគឺពី 1-12 ។

ថ្ងៃ៖ កន្សោមចំនួនគត់ដែលបង្ហាញពីថ្ងៃនៃខែដែលបានបញ្ជាក់។ តម្លៃដែលអាចប្រើបានគឺពី ១-៣១ ។ វានឹងមិនបង្ហាញកំហុសទេ ពេលអ្នកបញ្ចូលថ្ងៃដែលមិនមាននៅក្នុងខែដែលខ្លីជាង ៣១ នោះ។

អនុគមន៍ DateSerial ត្រឡប់ចំនួនថ្ងៃដែលស្ថិតនៅចន្លោះ 30,1899 និងកាលបរិច្ឆេទដែលបានផ្តល់ ។ អ្នកអាចប្រើអនុគមន៍នេះ ដើម្បីគណនាភាពខុសគ្នារវាងកាលបរិច្ឆេទពីរ ។

អនុគមន៍ DateSerial ត្រឡប់ប្រភេទទិន្នន័យវ៉ារ្យង់ជាមួយ VarType 7 (កាលបរិច្ឆេទ) ។ នៅខាងក្នុង តម្លៃនេះត្រូវបានរក្សាទុកជាតម្លៃទ្វេ ដូច្នេះនៅពេលកាលបរិច្ឆេទដែលបានផ្តល់គឺ 1.1.1900 នោះតម្លៃដែលត្រឡប់គឺ ២ ។ តម្លៃអវិជ្ជមានត្រូវគ្នាទៅនឹងកាលបរិច្ឆេទពីមុន ខែធ្នូ ៣០ ១៨៩៩ (មិនត្រូវបានរាប់បញ្ចូល) ។

ប្រសិនបើកាលបរិច្ឆេទត្រូវបានកំណត់ ស្ថិតនៅក្រៅជួរដែលទទួលយក LibreOffice Basic ត្រឡប់សារកំហុស ។

ដោយសារតែ អ្នកកំណត់ អនុគមន៍ DateValue ជាខ្សែអក្សរដែលមានកាលបរិច្ឆេទ អនុគមន៍ DateSerial វាយតម្លៃប៉ារ៉ាម៉ែត្រនីមួយៗ (ឆ្នាំ ខែ ថ្ងៃ) ជាកន្សោមលេខដាច់ដោយឡែកពីគ្នា ។

Error codes:

5 ការហៅបែបបទមិនត្រឹមត្រូវ

Example:


  Sub ExampleDateSerial
  Dim lDate As Long
  Dim sDate As String
      lDate = DateSerial(1964, 4, 9)
      sDate = DateSerial(1964, 4, 9)
      msgbox lDate REM returns 23476
      msgbox sDate REM ត្រឡប់ ០៤/០៩/១៩៦៤
  End Sub