VBScript의 임의의 차원 배열에있는 모든 항목을 반복하십시오.

Question

VBScript의 배열에있는 모든 요소를 ​​반복해야하지만 크기는 알 수 없습니다. 내가 어떻게 할 수 있니?

예를 들어, 다차원 배열은 배열의 배열이며 부분 배열 할 수 있습니다. VBscript에서 어떻게 할 수 있는지 모르겠습니다.

도움을 주시면 감사하겠습니다.

업데이트 :이 작업은 For Each loop against array를 사용하여 해결할 수 있습니다. 그럼, For Each Loop를 넘어서는 것은 무엇입니까? 구현 방법은?

Answer 1

Function 또는 Sub을 만들면 배열 내의 키가 배열인지 재귀 적으로 확인할 수 있습니다. 다음은 몇 가지 샘플 코드입니다.

<% 
' Simple sub to just loop through the array and echo its values 
Sub array_values(array_value) 
    Dim i 

    If IsArray(array_value) Then 
     For i = LBound(array_value) To UBound(array_value) 
      If IsArray(array_value(i)) Then 
       array_values array_value(i) 
      Else 
       Response.Write array_value(i) & "<br>" 
      End If 
     Next 
    End If 
End Sub 


' Sample array 
Dim a 

a = array(_ 
    array("1", "2", "3"), _ 
    array("a", "b", "c", _ 
     array("e", "f", "g", _ 
      array("h", "i", "j", _ 
       array("k", "l", "m", _ 
        array("n", "o", "p", _ 
         array("q", "r", "s", _ 
          array("t", "u", "v", _ 
           array("w", "x", "y") _ 
          ) _ 
         ) _ 
        ) _ 
       ) _ 
      ) _ 
     ) _ 
    ) _ 
) 

array_values a 
%>