DateSerial Function

ត្រឡប់តម្លៃ កាលបរិច្ឆេទ សម្រាប់ថ្ងៃ ខែ ឆ្នាំដែលបានបញ្ជាក់ ។

វាក្យសម្ពន្ធ ៖

DateSerial (year, month, day)

តម្លៃត្រឡប់ ៖

កាលបរិច្ឆេទ

ប៉ារ៉ាម៉ែត្រ ៖

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

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

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

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

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

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

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

Error codes:

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

ឧទាហរណ៍ ៖

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