主题：【求解：未处理】字典dictionary值ADD后，无法修改吗，修改报错！

可以修改，但尽量不要在循环里修改，如果要在循环里面，就必须把key拷贝一份

Dim zd As New Dictionary(Of Integer, String)
zd.Add(1,"苹果")
zd.Add(2,"香蕉")
zd.Add(3,"波罗")
zd.Add(4,"桔子")
zd.Add(5,"桃子")
Dim keys(zd.keys.Count) As Integer
zd.Keys.CopyTo(keys, 0)
For Each k As Integer In Keys '显示所有键及其对应的值
    zd(k) = 123456
    Output.Show(K & ":" & zd(k))
Next