Left Function

ត្រឡប់​ចំនួន​តួ​អក្សរ​ដែល​នៅ​ឆ្វេង​បំផុត ដែល​អ្នក​បញ្ជាក់​​នៃ​កន្សោម​ខ្សែ​អក្សរ ។

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

Left (Text As String, n As Long)

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

ខ្សែ​អក្សរ

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

Text ៖ កន្សោម​ខ្សែ​អក្សរ​ណា​មួយ ដែល​អ្នក​ចង់​ត្រឡប់​តួអក្សរ​នៅ​ឆ្វេង​បំផុត ។

យក​ទ្រង់​ទ្រាយ​ផ្ទាល់​ចេញ​ពី​អត្ថបទ ឬ​វត្ថុ​ដែល​បាន​ជ្រើស​ (ដូច​ជា​ក្នុង ​ទ្រង់​ទ្រាយ​ - ទ្រង់​ទ្រាយ​លំនាំដើម)

ឧទាហរណ៍​ដូច​ខាង​ក្រោម បម្លែង​កាល​បរិច្ឆេទ​ក្នុង​ទ្រង់ទ្រាយ YYYY.MM.DD ទៅ​ជា​ទ្រង់ទ្រាយ MM/DD/YYYY ។

ឧទាហរណ៍ ៖

Sub ExampleUSDate

Dim sInput As String

Dim sUS_date As String

    sInput = InputBox("Please input a date in the international format 'YYYY-MM-DD'")

    sUS_date = Mid(sInput, 6, 2)

    sUS_date = sUS_date & "/"

    sUS_date = sUS_date & Right(sInput, 2)

    sUS_date = sUS_date & "/"

    sUS_date = sUS_date & Left(sInput, 4)

    MsgBox sUS_date

End Sub