Environ 함수

적용 대상
Microsoft 365용 Access Access 2024 Access 2021 Access 2019 Access 2016

참고

Microsoft Jet Expression Service가 샌드박스 모드에서 실행되는 경우 이 항목에 설명된 함수, 메서드, 개체 또는 속성을 사용할 수 없으므로 잠재적으로 안전하지 않은 식을 평가할 수 없습니다. 샌드박스 모드에 대한 자세한 내용은 도움말에서 "샌드박스 모드"를 검색하세요.

운영 체제 환경 변수와 관련된 문자열 을 반환합니다. Macintosh에서는 사용할 수 없음

구문

Environ( { envstring | number } )

Environ 함수 구문에는 다음과 같은 인수가 있습니다.

인수 설명
envstring 선택 요소입니다. 환경 변수의 이름을 포함하는 문자열 식입니다.
숫자 선택 요소입니다. 환경 문자열 테이블에 있는 환경 문자열의 숫자 순서에 해당하는 숫자식입니다. number 인수는 임의의 숫자식일 수 있지만 계산되기 전에 정수로 반올림됩니다.

    

주의

환경 문자열 테이블에서 envstring 을 찾을 수 없는 경우 길이가 0인 문자열("")이 반환됩니다. 그렇지 않으면 Environ 은 지정된 envstring에 할당된 텍스트를 반환합니다. 즉, 해당 환경 변수에 대한 환경 문자열 테이블에서 등호(=) 뒤에 오는 텍스트입니다.

number를 지정하면 환경 문자열 테이블에서 해당 숫자 위치를 차지하는 문자열이 반환됩니다. 이 경우 Environ 은 envstring을 포함한 모든 텍스트를 반환합니다. 지정된 위치에 환경 문자열이 없으면 Environ 은 길이가 0인 문자열을 반환합니다.

예제

참고

VBA(Visual Basic for Applications) 모듈에서 이 함수를 사용하는 경우를 예로 들어 보겠습니다. VBA 사용에 대해 자세히 알아보려면 검색 옆의 드롭다운 목록에서 개발자 참고를 선택하고 검색 상자에 검색어를 하나 이상 입력하세요.

이 예제에서는 Environ 함수를 사용하여 환경 문자열 테이블에서 문의 항목 번호와 길이 PATH 를 제공합니다. 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