Função Environ

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

Necessitamos da sua ajuda!