set d = createobject("scripting.dictionary")为何不能使用 d.key(d.keys(0))="牛一斤"

2024-12-02 03:30:35
推荐回答(1个)
回答1:

你这个问题出在 d.Keys(0) 上。
d.Keys 方法返回包含字典的所有关键字的一维数组,但是该方法不能直接使用类似 d.Keys.Item 的样式引用其中的元素。必须先将返回的数组赋值给一个数组变量,类似:
Dim Arr As Variant
Arr=d.Keys
d.Key(Arr(0)) = "牛一斤"