CurDir Function

একটি ভেরিয়েন্ট স্ট্রিং প্রদান করে যা উল্লেখিত ড্রাইভের বর্তমান পাথ নির্য়েশ করে থাকে।

সতর্কতামূলক আইকন

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


সিনট্যাক্স:

CurDir [(Text As String)]

প্রদান মান:

স্ট্রিং

প্যারামিটার:

পাঠ্য: বিদ্যমান ড্রাইভ উল্লেখকারী যেকোনো স্ট্রিং এক্সপ্রশেন (যেমন, প্রথম হার্ডড্রাইভের প্রথম অংশ নির্দেশের জন্য "C")।

যদি কোন ড্রাইভের উল্লেখ না থাকে অথবা ড্রাইভটি একটি শূন্য দৈর্ঘ্যের স্ট্রিং ("") হয়, তাহলে CurDir বর্তমান ড্রাইভের জন্য পাথ প্রদান করে থাকে। যদি ড্রাইভ বর্ণনার সিনট্যাক্স ভুল হয়, ড্রাইভটি উপস্থিত না থাকে অথবা Lastdrive স্টেটমেন্টের মাধ্যমে CONFIG.SYS এ নির্ধারিত অক্ষরের পরের অক্ষর দ্বারা ড্রাইভটি নির্দেশিত হয়, তাহলে LibreOffice বেসিক একটি ত্রুটি প্রদান করে থাকে।

এই ফাংশনটি অক্ষরের ছাঁদ নির্ভরশীল নয়।

Error codes:

5 Invalid procedure call

68 Device not available 68 Device not available

7 Out of memory

51 Internal error 51 Internal error 51 Internal error

উদাহরণ:

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