CurDir Function

ត្រឡប់ខ្សែអក្សរវ៉ារ្យ៉ង់ដែលតំណាងឲ្យផ្លូវបច្ចុប្បន្ន នៃដ្រាយដែលបានបញ្ជាក់ ។

This statement currently does not work as documented. See this issue for more information.

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

CurDir [(Text As String)]

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

ខ្សែអក្សរ

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

Text ៖ កន្សោមខ្សែអក្សរណាមួយ ដែលមានដ្រាយដែលមានស្រាប់ (ឧទាហរណ៍ "C" សម្រាប់ភាគទីមួយនៃដ្រាយរឹងទីមួយ) ។

ប្រសិនបើគ្មានដ្រាយត្រូវបានបញ្ជាក់ ឬប្រសិនបើដ្រាយជាខ្សែអក្សរប្រវែងសូន្យ ("") អនុគមន៍ CurDir ត្រឡប់ផ្លូវនៃដ្រាយបច្ចុប្បន្ន ។ LibreOffice Basic បង្ហាញកំហុសមួយ ប្រសិនបើវាក្យសម្ពន្ធនៃការពិពណ៌នាដ្រាយមិនត្រឹមត្រូវ គ្មានដ្រាយ ឬប្រសិនបើតួអក្សរដ្រាយស្ថិតនៅបន្ទាប់ពីតួអក្សរដែលបានកំណត់ក្នុង CONFIG.SYS ជាមួយសេចក្តីថ្លែងការណ៍ Lastdrive ។

អនុគមន៍នេះមិនប្រកាន់អក្សរធំតូច ។

Error codes:

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

68 មិនមានឧបករណ៍

7 គ្មានអង្គចងចាំគ្រប់គ្រាន់

51 កំហុសខាងក្នុង

ឧទាហរណ៍ ៖

Sub ExampleCurDir

Dim sDir1 As String , sDir2 As String

    sDir1 = "c:\Test"

    sDir2 = "d:\Private"

    ChDir( sDir1 )

    MsgBox CurDir

    ChDir( sDir2 )

    MsgBox CurDir

End Sub