Question

我将多维数组存储在字典中，例如 Dic＆＃34; myKey＆＃34;，Array（1,10）所以它将是两列，并且是11行数组。

我这样存储：

Dic.Add myKey, arrayVariable

然后我想回到我的阵列：

arrayVariable = Dic("myKey")

此行显示错误：

Microsoft VBScript runtime error '800a000d'  
Type mismatch

如果我将数组Dic("myKey")发送到将循环它的函数，它工作正常，但是从字典中拉出数组，我得到了错误。

我的任务是在词典中存储一个键和一个多维数组。该数组有两个数字列。

我希望第二列有一个排序功能，但保持第一列不变。

我不在乎使用任何类型，Array，ArrayList或任何其他可以完成这项工作的对象。

Answer 1

在我的变量维度中，我声明了这样的数组：

Dim Arr()

然后ReDim它（有和没有Preserve）。

当我让任何函数返回一个数组，并将其设置为Arr变量时，我收到一个错误。但是，当我删除括号并将其声明为：

Dim Arr
ReDim Arr(cols, rows)

它解决了错误。