Option Explicit
Dim aryAll
Dim aryString
Dim aryInt
Dim aryMix
Dim ary
Dim val
aryString = Array( "acha" , "porute" , "piipo" )
aryInt = Array( 0 , 42 , 666 )
aryMix = Array( "boo" , 999 , "foo" , 000 , "woo" )
aryAll = Array( aryString , aryInt , aryMix )
For Each ary In aryAll
For Each val In ary
WScript.Echo val
Next
Next
' acha
' purute
' piipo
' 0
' 42
' 666
' boo
' 999
' foo
' 000
' woo