Επιστρέφει Variant (String) που αντιπροσωπεύει την τρέχουσα διαδρομή.
Σύνταξη
CurDir[(μονάδα_δίσκου)]
Το προαιρετικό όρισμα μονάδα_δίσκου είναι μια έκφραση συμβολοσειράς η οποία καθορίζει μια υπάρχουσα μονάδα δίσκου. Εάν δεν καθοριστεί κάποια μονάδα δίσκου ή εάν η μονάδα_δίσκου είναι συμβολοσειρά μηδενικού μήκους (""), η πρόταση CurDir επιστρέφει τη διαδρομή για την τρέχουσα μονάδα δίσκου.
Στο παράδειγμα αυτό χρησιμοποιείται η συνάρτηση CurDir για την επιστροφή της τρέχουσας διαδρομής.
' Στα Microsoft Windows:
' Υποθέστε ότι η τρέχουσα διαδρομή στη μονάδα δίσκου C είναι "C:\WINDOWS\SYSTEM".
' Υποθέστε ότι η τρέχουσα διαδρομή στη μονάδα δίσκου D είναι "D:\EXCEL".
' Υποθέστε ότι η τρέχουσα μονάδα δίσκου είναι η C.
Dim Διαδρομή1
Διαδρομή1 = CurDir ' Επιστρέφει "C:\WINDOWS\SYSTEM".
Διαδρομή1 = CurDir("C") ' Επιστρέφει "C:\WINDOWS\SYSTEM".
Διαδρομή1 = CurDir("D") ' Επιστρέφει "D:\EXCEL".
' Στο Macintosh:
' Τα γράμματα μονάδων αγνοούνται. Επιστρέφεται η διαδρομή για την τρέχουσα μονάδα.
' Υποθέστε ότι η τρέχουσα διαδρομή προς τη μονάδα HD είναι "HD:ΦΑΚΕΛΟΣ1".
' Υποθέστε ότι η τρέχουσα μονάδα είναι η HD. Στον υπολογιστή υπάρχει και η μονάδα MD.
Dim Διαδρομή1
Διαδρομή1 = CurDir ' Επιστρέφει "HD:ΦΑΚΕΛΟΣ1".
Διαδρομή1 = CurDir("HD") ' Επιστρέφει "HD:ΦΑΚΕΛΟΣ1".
Διαδρομή1 = CurDir("MD") ' Επιστρέφει "HD:ΦΑΚΕΛΟΣ1".