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.
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