Fungsi Environ

Mengembalikan nilai variabel lingkungan sebagai string. Variabel lingkungan tergantung pada jenis sistem operasi yang Anda miliki.

Sintaksis:


Environ (Environment As String)

Nilai hasil:

String

Parameter:

Keliling: Variabel keliling yang Anda ingin mengembalikan nilainya.

Kode kesalahan:

5 Tidak sah dalam pemanggilan prosedur

Contoh:


Sub ExampleEnviron
Dim sTemp As String
    sTemp=Environ ("TEMP")
    If sTemp = "" Then sTemp=Environ("TMP")
    MsgBox "'" & sTemp & "'" ,64,"Drektori berkas temporer:"
End Sub