Fungsi dir

Penting: Artikel ini adalah terjemahan mesin, lihat penafian. Temukan versi bahasa Inggris artikel di sini sebagai rujukan Anda.

Catatan: Fungsi, metode, objek, atau properti yang dijelaskan dalam topik ini dinonaktifkan jika Layanan ekspresi Microsoft Jet sedang berjalan di mode kotak pasir yang mencegah evaluasi ekspresi yang berpotensi tidak aman. Untuk informasi selengkapnya tentang mode kotak pasir, Cari "mode kotak pasir" di bantuan.

Mengembalikan sebuah String yang mewakili nama file, direktori atau folder yang cocok dengan pola tertentu atau atribut file, atau volume label drive.

Sintaks

DIR [(path [atribut] )]

Sintaks fungsi Dir memiliki argumen ini:

Argumen

Deskripsi

path

Opsional. String ekspresi yang menetapkan nama file — mungkin menyertakan direktori atau folder, dan drive. String panjang nol ("") akan dikembalikan jika path tidak ditemukan.

atribut

Opsional. Konstanta atau ekpresi numerik, jumlah yang menentukan atribut file. Jika dihilangkan, mengembalikan file yang cocok path tetapi tidak memiliki atribut.


Pengaturan

Atribut argumen pengaturan ini:

Konstanta

Nilai

Deskripsi

vbNormal

0

(Default) Menyatakan file dengan atribut tidak ada.

vbReadOnly

1

Menentukan file baca-saja selain file dengan atribut tidak ada.

vbHidden

2

Menentukan file tersembunyi selain file dengan atribut tidak ada.

VbSystem

4

Menentukan sistem file selain file dengan atribut tidak ada. Tidak tersedia di Macintosh.

vbVolume

8

Menentukan volume label; Jika lain yang disebabkan oleh yang ditentukan, vbVolume diabaikan. Tidak tersedia di Macintosh.

vbDirectory

16

Menentukan direktori atau folder selain file dengan atribut tidak ada.

vbAlias

64

Nama file yang ditentukan adalah alias. Tersedia hanya di Macintosh.


Catatan: Konstanta ini ditentukan oleh Visual Basic for Applications (VBA) dan bisa digunakan di mana saja dalam kode Anda sebagai ganti nilai aktual.

Keterangan

Di Microsoft Windows, Dir mendukung penggunaan beberapa karakter (*) dan wildcard karakter tunggal (?) untuk menentukan beberapa file. Macintosh, karakter ini akan diperlakukan sebagai karakter nama file yang valid dan tidak bisa digunakan sebagai wildcard untuk menentukan beberapa file.

Karena Macintosh tidak mendukung wildcard, menggunakan tipe file untuk mengidentifikasi grup file. Anda bisa menggunakan fungsi MacID untuk menentukan tipe file daripada menggunakan nama file. Misalnya, pernyataan berikut ini mengembalikan nama file teks pertama dalam folder saat ini:

Dir("SomePath", MacID("TEXT"))

Untuk lebih dari semua file dalam folder, tentukan string kosong:

Dir("")

Jika Anda menggunakan fungsi MacID dengan Anda di Windows, kesalahan terjadi.

Nilai atribut yang lebih besar dari 256 dianggap nilai MacID .

Anda harus menentukan path pertama kalinya Anda memanggil fungsi Dir , atau kesalahan terjadi. Jika Anda juga menentukan file atribut, path harus disertakan.

DIR mengembalikan nama file pertama yang cocok dengan nama path. Untuk mendapatkan nama file tambahan apa pun yang cocok dengan path, hubungi Dir lagi dengan argumen tidak ada. Saat nama file tidak cocok, Dir mengembalikan string panjang nol (""). Setelah string panjang-nol kembali, Anda harus menentukan path dalam panggilan selanjutnya atau terjadi kesalahan. Anda bisa mengubah baru path tanpa mengambil semua nama file yang cocok dengan saat ini path. Namun, Anda tidak bisa menghubungi Dir fungsi rekursif. Memanggil Dir dengan atribut vbDirectory tidak selalu mengembalikan subdirektori.

Tips     Karena nama file diambil dalam urutan tertentu, Anda mungkin ingin menyimpan nama file dikembalikan di larik, dan lalu Urutkan array.

Contoh

Catatan: Contoh yang mengikuti demonstrasi penggunaan fungsi ini dalam modul Visual Basic for Applications (VBA). Untuk informasi selengkapnya tentang bekerja dengan VBA, pilih Referensi Pengembang di daftar turun bawah di samping Cari dan masukkan satu istilah atau lebih di kotak pencarian.

Contoh ini menggunakan fungsi Dir untuk memeriksa apakah file tertentu dan direktori ada. Macintosh, "HD:" adalah nama drive default dan bagian-bagian dari nama path dipisahkan oleh titik dan bukan garis miring terbalik. Juga, karakter wildcard Windows diperlakukan sebagai karakter nama file yang valid Macintosh. Namun, Anda bisa menggunakan fungsi MacID untuk menentukan file grup.

Dim MyFile, MyPath, MyName
' Returns "WIN.INI" (on Microsoft Windows) if it exists.
MyFile = Dir("C:\WINDOWS\WIN.INI")
' Returns filename with specified extension. If more than one *.ini
' file exists, the first file found is returned.
MyFile = Dir("C:\WINDOWS\*.INI")
' Call Dir again without arguments to return the next *.INI file in the
' same directory.
MyFile = Dir
' Return first *.TXT file with a set hidden attribute.
MyFile = Dir("*.TXT", vbHidden)
' Display the names in C:\ that represent directories.
MyPath = "c:\" ' Set the path.
MyName = Dir(MyPath, vbDirectory) ' Retrieve the first entry.
Do While MyName <> "" ' Start the loop.
' Ignore the current directory and the encompassing directory.
If MyName <> "." And MyName <> ".." Then
' Use bitwise comparison to make sure MyName is a directory.
If (GetAttr(MyPath & MyName) And vbDirectory) = vbDirectory Then
Debug.Print MyName ' Display entry only if it
End If ' it represents a directory.
End If
MyName = Dir ' Get next entry.
Loop

Catatan: Penafian Terjemahan Mesin: Artikel ini telah diterjemahan oleh sistem komputer tanpa campur tangan manusia. Microsoft menawarkan terjemahan mesin ini untuk membantu pengguna yang bukan penutur bahasa Inggris agar dapat menikmati konten tentang produk, layanan, dan teknologi Microsoft. Karena artikel ini diterjemahkan oleh mesin, mungkin akan terdapat kesalahan kosa kata, sintaksis, atau tata bahasa.

Kembangkan keterampilan Anda
Jelajahi pelatihan
Dapatkan fitur baru terlebih dahulu
Gabung ke Office Insiders

Apakah informasi ini bermanfaat?

Terima kasih atas umpan balik Anda!

Terima kasih atas umpan balik Anda! Sepertinya menghubungkan Anda ke salah satu agen dukungan Office kami akan sangat membantu.

×