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

妳這個問題出在 d.Keys(0) 上。

d.Keys 方法返回包含字典的所有關鍵字的壹維數組，但是該方法不能直接使用類似 d.Keys.Item 的樣式引用其中的元素。必須先將返回的數組賦值給壹個數組變量，類似：

Dim Arr As Variant