Função Environ

Retorna o valor de uma variável de ambiente como uma string. As variáveis de ambiente dependem do tipo de sistema operacional que você possui.

Sintaxe:


Environ (Environment As String)

Valor de retorno:

String

Parâmetros:

Environment: variável Environment para a qual você deseja retornar o valor.

Códigos de erro:

5 Chamada de procedimento inválida

Exemplo:


Sub ExampleEnviron
Dim sTemp As String
    sTemp=Environ ("TEMP")
    If sTemp = "" Then sTemp=Environ("TMP")
    MsgBox "'" & sTemp & "'" ,64,"Diretório de arquivos temporários:"
End Sub