Contents
Index 🔎︎

# 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