For Each...Next

For each... 다음 문장
http://www.yesky.com/imagesnew/software/vbscript/html/vsstmForEach.htm
배열 또는 집합 하 다. 의 모든 요소 에 대해 한 조 의 문 구 를 반복 합 니 다.For Each element In group
[statements]
[Exit For]
[statements]
Next [element]
매개 변수
element
집합 이나 배열 의 모든 요 소 를 매 거 하 는 데 사용 되 는 변량.집합 에 대해 element 는 Variant 변수, 유 니 버 설 Object 변수 또는 임의로 지정 한 자동화 대상 변수 일 수 있 습 니 다.배열 에 있어 서 element 는 Variant 변수 일 수 밖 에 없습니다.
group
대상 집합 이나 배열 의 이름.
statements
group 의 모든 항목 에 실 행 된 하나 이상 의 문장 입 니 다.
설명 하 다.
group 에 최소한 하나의 요소 가 있 으 면 For Each 블록 에 들 어가 실 행 됩 니 다.순환 에 들 어가 면 먼저 group 의 첫 번 째 요소 에 대해 순환 중의 모든 문 구 를 실행 합 니 다.group 에 다른 요소 가 있 으 면 모든 요소 에 순환 하 는 문 구 를 실행 합 니 다.group 에 다른 요소 가 없 을 때 순환 을 종료 한 다음 Next 구문 이후 의 문 구 를 계속 실행 합 니 다.
Exit For 는 For Each... Next 또는 For... Next 제어 구조 에서 순환 을 종료 하 는 다른 방법 을 제공 할 수 있 습 니 다.순환 하 는 임의의 위치 에 임의의 Exit For 문 구 를 배치 할 수 있 습 니 다.Exit For 는 항상 조건 판단 문구 와 함께 사용 (예 를 들 어 If... Then) 하고 즉시 제어 권 을 Next 이후 의 문구 로 이전 합 니 다.
하나의 For Each... Next 순환 을 다른 것 에 배치 하여 포 함 된 For Each... Next 순환 을 구성 할 수 있 습 니 다.하지만 모든 순환 요소 가 유일 해 야 합 니 다.
Next 문장의 element 를 생략 하면 프로그램 은 이미 포함 되 어 있 는 것 처럼 계속 실 행 됩 니 다.Next 문 구 는 해당 For 문 구 를 앞 두 고 나타 나 면 오류 가 발생 할 수 있 습 니 다.
다음 예 를 들 어 For Each 를 어떻게 사용 하 는 지 설명 합 니 다. 다음 문장:

Function ShowFolderList(folderspec)
  Dim fso, f, f1, fc, s
  Set fso = CreateObject("Scripting.FileSystemObject")
  Set f = fso.GetFolder(folderspec)
  Set fc = f.Files
  For Each f1 in fc
    s = s & f1.name 
    s = s & "<BR>"
  Next
  ShowFolderList = s
End Function