Environ Function

Devolve o valor de uma variável de ambiente como cadeia de texto. As variáveis de ambiente estão dependentes do tipo de sistema operativo de que dispõe.

Sintaxe:

Environ (Environment As String)

Valor de retorno:

Cadeia

Parâmetros:

Ambiente: variável de ambiente para a qual pretende devolver o valor.

Códigos de erro

5 Chamada de procedimento inválido

Exemplo:

Sub ExampleEnviron

Dim sTemp As String

    sTemp=Environ ("TEMP")

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

    MsgBox "'" & sTemp & "'" ,64,"Diretório de ficheiros temporários:"

End Sub