Environ Function

Returns the value of an environment variable as a string. Environment variables are dependent on the type of operating system that you have.

Syntax:

Environ (Environment As String)

рд╡рд╛рдкрд╕реА рдореВрд▓реНрдп:

рд╡рд╛рдХреНрдпрд╛рдВрд╢

рдкреИрд░рд╛рдореАрдЯрд░

рд╡рд╛рддрд╛рд╡рд░рдг: рдПрдирд╡рд╛рдпрд░рдирдореЗрдВрдЯ рд╡реЗрд░рд┐рдПрдмрд▓ рдЬрд┐рд╕рдХрд╛ рдореВрд▓реНрдп рдЖрдк рдкреНрд░рд╛рдкреНрдд рдХрд░рдирд╛ рдЪрд╛рд╣рддреЗ рд╣реИрдВ.

Error codes:

5 Invalid procedure call

рдЙрджрд╛рд╣рд░рдг:

Sub ExampleEnviron

Dim sTemp As String

    sTemp=Environ ("TEMP")

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

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

End Sub