Função Environ

Importante :  Este artigo foi traduzido por um sistema de tradução automática, leia o aviso de isenção de responsabilidade. Para sua referência, veja a versão em inglês deste artigo aqui.

Observação : A função, método, objeto ou propriedade descrito neste tópico será desabilitada se o Microsoft Jet Expression Service está em execução no modo de área restrita, o que impede a avaliação das expressões possivelmente não seguras. Para obter mais informações sobre o modo seguro, procure por "modo seguro" na Ajuda.

Retorna que a cadeia de caracteres associado a uma variável de ambiente do sistema operacional. Não disponível no Macintosh

Sintaxe

Environ ( { envstring | número } )

A sintaxe da função Environ possui os seguintes argumentos:

Argumento

Descrição

envstring

Opcional. Expressão de cadeia de caracteres contendo o nome de uma variável de ambiente.

número

Opcional. Expressão numérica correspondente a ordem numérica da cadeia de caracteres de ambiente na tabela de cadeia de caracteres de ambiente. O argumento number pode ser qualquer expressão numérica, mas é arredondado para um número inteiro antes de ser avaliado.


Comentários

Se envstring não pode ser encontrado na tabela de cadeia de caracteres de ambiente, uma cadeia de caracteres de comprimento zero ("") é retornado. Caso contrário, Environ retornará o texto atribuído à especificado envstring; ou seja, o texto após a igual sinal (=) na tabela de cadeia de caracteres de ambiente para aquela variável de ambiente.

Se você especificar um número, a cadeia de caracteres que ocupa essa posição numérica na tabela de cadeia de caracteres de ambiente será retornada. Nesse caso, Environ retornará todo o texto, incluindo envstring. Se não houver nenhuma cadeia de caracteres de ambiente na posição especificada, Environ retorna uma cadeia de comprimento zero.

Exemplo

Observação : Exemplos a seguir demonstram o uso dessa função em um Visual Basic para módulo Applications (VBA). Para obter mais informações sobre como trabalhar com o VBA, selecione a Referência do desenvolvedor na lista suspensa ao lado de pesquisa e insira um ou mais termos na caixa de pesquisa.

Este exemplo usa a função Environ para fornecer o número de entrada e o comprimento da instrução PATH da tabela de cadeia de caracteres de ambiente. Não disponível no Macintosh.

Dim EnvString, Indx, Msg, PathLen    ' Declare variables.
Indx = 1 ' Initialize index to 1.
Do
' Get environment variable.
EnvString = Environ(Indx)
' Check PATH entry.
If Left(EnvString, 5) = "PATH=" Then
' Get length.
PathLen = Len(Environ("PATH"))
Msg = "PATH entry = " & Indx & " and length = " _
& PathLen
Exit Do
Else
' Not PATH entry, so increment.
Indx = Indx + 1
End If
Loop Until EnvString = ""
If PathLen > 0 Then
' Display message.
MsgBox Msg
Else
MsgBox "No PATH environment variable exists."
End If

Observação : Aviso de Isenção de Tradução Automática: Este artigo foi traduzido por computador, sem intervenção humana. A Microsoft oferece essas traduções automáticas para ajudar as pessoas que não falam inglês a aproveitar os textos escritos sobre produtos, serviços e tecnologias da Microsoft. Como este artigo foi traduzido automaticamente, é possível que contenha erros de vocabulário, sintaxe ou gramática.

Expanda suas habilidades
Explore o treinamento
Obtenha novos recursos primeiro
Ingressar no Office Insider

Essas informações foram úteis?

Obrigado por seus comentários!

Agradecemos pelos seus comentários! Parece que pode ser útil conectar você a um de nossos agentes de suporte do Office.

×