◆ Environ 함수
운영 체제 환경 변수와 관련된 String을 반환합니다.
구문 Environ({envstring | number})
Environ 함수문은 다음과 같이 명명된 인수로 구성되어 있습니다.
|
구성 요소 |
설명 |
|
envstring |
선택. 환경 변수 이름이 들어 있는 문자열 식입니다. |
|
number |
선택. 환경 문자열 테이블의 환경 문자열 순서에 대응하는 숫자 식입니다. number 인수는 숫자 식이 될 수 있지만 평가하기 전에 정수로 반올림합니다. |
|
|
참고
환경 문자열 테이블에 envstring이 없으면 길이가 0인 문자열("")이 되돌려 집니다. 환경 문자열 표에 envstring이 존재하면 Environ은 지정된 envstring에 지정된 텍스트, 즉 그 환경 변수에 대해 환경 문자열 표의 등호(=) 다음에 오는 텍스트를 반환합니다.
number를 지정하면 환경 변수 테이블에서 그 수 위치가 차지하는 문자열을 반환합니다. 이 경우에 Environ은 envstring을 포함하여 텍스트 모두를 반환합니다. 지정된 위치에 환경 문자열이 존재하지 않으면 Environ은 길이가 0인 문자열을 반환합니다.
|
명명된 인수 개체 라이브러리에서 먼저 정의된 이름을 가진 인수를 의미합니다. 구문에서 요구하는 지정된 순서의 각 인수 값을 제공하는 대신에 사용자는 명명된 인수를 사용하여 임의의 순서로 값을 할당할 수 있습니다. 예를 들면 다음과 같이 세 개의 인수를 받는 방법을 제안합니다. DoSomeThing namedarg1, namedarg2, namedarg3 값을 명명된 인수에 할당함으로써 사용자는 다음의 문을 사용할 수 있습니다. DoSomeThing namedarg3 := 4, namedarg2 := 5, namedarg1 := 20 명명된 인수는 구문의 정상 배치 순서로 나타내지 않아도 된다는 것을 주의하십시오. |
|
|
Environ 함수 예제
이 예제는 Environ 함수를 사용하여 환경 문자열 표에서 입력 번호와 PATH 문의 길이를 지원합니다.
Dim EnvString, Indx, Msg, PathLen ' 변수를 선언합니다.
Indx = 1 ' 1로 인덱스를 초기화합니다.
Do
EnvString = Environ(Indx) ' 환경 변수를 읽어들입니다.
If Left(EnvString, 5) = "PATH=" Then ' PATH 항목을 확인합니다.
PathLen = Len(Environ("PATH")) ' 길이를 읽어들입니다.
Msg = "PATH entry = " & Indx & " and length = " & PathLen
Exit Do
Else
Indx = Indx + 1 ' PATH 항목이 아닙니다,
End If ' 증가.
Loop Until EnvString = ""
If PathLen > 0 Then
MsgBox Msg ' 메시지를 표시합니다.
Else
MsgBox "No PATH environment variable exists."
End If