>>225
ふつうの使い方だと思うけど…

>>226
エラーチェックする必要ないっすよね

Dim a
a = Array(Array(0,0,0), Array(0,0,0))

Dim d
Set d = CreateObject("Scripting.Dictionary")

Dim i
For Each i In a
　d(Join(A, Chr(31))) = i
Next

>>227
ソートするならば配列を比較するメソッドを用意しなきゃいけないのよね。
配列の比較を言語でサポートしてくれればいいのにね!!