LibreOffice 25.2 Help
គណនាតម្លៃសម្គាល់ពេលវេលាពីប៉ារ៉ាម៉ែត្រម៉ោង នាទី និងវិនាទីដែលបានបញ្ជាក់ ដែលបានហុចជាខ្សែអក្សរ ដែលតំណាងឲ្យពេលវេលាក្នុងតម្លៃលេខតែមួយ ។ តម្លៃនេះអាចត្រូវបានប្រើដើម្បីគណនាភាពខុសគ្នារវាងពេលវេលា ។
TimeValue (Text As String)
កាលបរិច្ឆេទ
Text ៖ កន្សោមខ្សែអក្សរណាមួយ ដែលមានពេលវេលាដែលអ្នកចង់គណនាក្នុងទ្រង់ទ្រាយ "HH:MM:SS" ។
ប្រើអនុគមន៍ TimeValue ដើម្បីបម្លែងពេលវេលាណាមួយទៅជាតម្លៃតែមួយ ដូច្នេះអ្នកអាចគណនាភាពខុសគ្នានៃពេលវេលា ។
អនុគមន៍ TimeValue នេះត្រឡប់វ៉ារ្យង់ប្រភេទ VarType 7 (កាលបរិច្ឆេទ) និងរក្សាទុកតម្លៃនេះនៅខាងក្នុងជា លេខដែលមានចំនួនទសភាគទ្វេចន្លោះពី 0 ដល់ 0.9999999999 ។
ដោយផ្ទុយគ្នាទៅនឹងអនុគមន៍ DateSerial ឬ DateValue ដែលតម្លៃសម្គាល់កាលបរិច្ឆេទបង្ហាញលទ្ធផលជាថ្ងៃដែលទាក់ទងទៅនឹងកាលបរិច្ឆេទថេរមួយ អ្នកអាចគណនាជាមួយតម្លៃដែលត្រូវបានត្រឡប់ដោយអនុគមន៍ TimeValue ប៉ុន្តែអ្នកមិនអាចវាយតម្លៃពួកវាបានទេ ។
នៅក្នុងអនុគមន៍ TimeSerial អ្នកអាចហុចប៉ារ៉ាម៉ែត្រផ្សេងគ្នា (ម៉ោង នាទី វិនាទី) ជាកន្សោមលេខដាច់ពីគ្នា ។ សម្រាប់អនុគមន៍ TimeValue ទោះជាយ៉ាងណាក៏ដោយ អ្នកអាចហុចខ្សែអក្សរមួយជាប៉ារ៉ាម៉ែត្រដែលមានពេលវេលា ។
Sub ExampleTimerValue
Dim daDT As Date
Dim a1, b1, c1, a2, b2, c2 As String
a1 = "start time"
b1 = "end time"
c1 = "total time"
a2 = "8:34"
b2 = "18:12"
daDT = TimeValue(b2) - TimeValue(a2)
c2 = a1 & ": " & a2 & chr(13)
c2 = c2 & b1 & ": " & b2 & chr(13)
c2 = c2 & c1 & ": " & trim(Str(Hour(daDT))) & ":" & trim(Str(Minute(daDT))) & ":" & trim(Str(Second(daDT)))
MsgBox c2
End Sub