Excel 带有'类型键的字典；整数'；和类型为'的值；动态整数数组'；：类型不匹配错误

我想要一个字典，其中包含“integer”类型的键和“dynamic array of integers”类型的值

下面的代码给出了一个类型不匹配

第一个

if

语句使用key=0和array[0]设置字典。
第二个

if

语句尝试修改键以使数组[0,1]具有值

子测试仪（）
“准备图邻接字典”
作为对象的Dim dict
Set dict=CreateObject（“Scripting.Dictionary”）
将a（）设置为整数
作为整数的Dim ub
如果（不存在dict.Exists（0）），则
重拨a（0到0）
a（0）=0
添加0，a（0）
如果结束
如果（dict.Exists（0）），则
ub=UBound（dict（0））'这里的类型不匹配？为什么？
重拨a（0至ub）
a=dict（0）
重拨保留a（0到ub+1）
a（ub+1）=1
dict（0）=a
如果结束
端接头

将

一个（0）

整数添加到字典中。然后检索它并尝试将其视为数组。@gserg因此它应该是dict。添加0，a？是的，应该是。您将

a（0）

，它是一个

整数

，添加到字典中。然后检索它并尝试将其作为数组处理。@gserg所以它应该是dict。添加0，a？是的，应该是。