Environ Function

Vraca vrijednost varijable okruženja kao string. Okruzujuce varijable ovise o vrsti operativnog sistema koji imate.

Sintaksa:

Okruzujuca (Okruzenje kao String)

Vrati vrijednost:

Stringovi

Parametri:

Okruženje: Varijabla okruženja kojoj želite vratiti vrijednost.

Error codes:

5 Invalid procedure call

Primjer:

Sub ExampleEnviron

Dim sTemp As String

    sTemp=Environ ("TEMP")

    If sTemp = "" Then sTemp=Environ("TMP")

    MsgBox "'" & sTemp & "'" ,64,"Directory of temporary files:"

End Sub