Environ fungsi

Catatan:  Kami ingin secepatnya menyediakan konten bantuan terbaru dalam bahasa Anda. Halaman ini diterjemahkan menggunakan mesin dan mungkin terdapat kesalahan tata bahasa atau masalah keakuratan. Kami bertujuan menyediakan konten yang bermanfaat untuk Anda. Dapatkah Anda memberi tahu kami apakah informasi ini bermanfaat untuk Anda di bagian bawah halaman ini? Berikut artikel dalam bahasa Inggris untuk referensi.

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 String yang terkait dengan sistem operasi variabel. Tidak tersedia di Macintosh

Sintaks

Environ ( { envstring | nomor } )

Sintaks fungsi Environ memiliki argumen ini:

Argumen

Deskripsi

envstring

Opsional. Ekspresi string berisi nama variabel.

angka

Opsional. Ekpresi numerik sesuai urutan numerik lingkungan string dalam string lingkungan tabel. Nomor argumen bisa berupa ekspresi numerik apa pun, tapi dibulatkan ke bilangan bulat sebelum itu dievaluasi.


Keterangan

Jika envstring tidak ditemukan di lingkungan-string tabel, string panjang nol ("") akan dikembalikan. Jika tidak, Environ mengembalikan teks yang ditetapkan ke ditentukan envstring; yaitu, teks yang mengikuti sama dengan masuk (=) dalam tabel lingkungan-string untuk variabel lingkungan tersebut.

Jika Anda menetapkan angka, string menempati posisi numerik dalam tabel string lingkungan dikembalikan. Dalam kasus ini, Environ mengembalikan semua teks, termasuk envstring. Jika ada string lingkungan tidak ada di posisi yang ditentukan, Environ mengembalikan string panjang-nol.

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 Environ entri nomor dan panjang pernyataan PATH dari tabel lingkungan-string. Tidak tersedia di Macintosh.

Dim EnvString, Indx, Msg, PathLen    ' Declare variables.
Indx = 1 ' Initialize index to 1.
Do
' Get environment variable.
EnvString = Environ(Indx)
' Check PATH entry.
If Left(EnvString, 5) = "PATH=" Then
' Get length.
PathLen = Len(Environ("PATH"))
Msg = "PATH entry = " & Indx & " and length = " _
& PathLen
Exit Do
Else
' Not PATH entry, so increment.
Indx = Indx + 1
End If
Loop Until EnvString = ""
If PathLen > 0 Then
' Display message.
MsgBox Msg
Else
MsgBox "No PATH environment variable exists."
End If
Kembangkan keterampilan Office 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.

×