主题：字典在异步函数下问题

定义了一个字典

Dim zd As New Dictionary(Of Integer, String)

zd.Add(1,"苹果")
zd.Add(2,"香蕉")
zd.Add(3,"波罗")
zd.Add(4,"桔子")
zd.Add(5,"桃子")

有一个内部函数send()

在窗口按钮中异步执行这个函数，参数传递这个字典，同时将字典值清空

Functions.AsyncExecute("send"，zd)

zd("1") = ""

zd("2") = ""

zd("3") = ""

zd("4") = ""

zd("5") = ""

在函数中定义一个字典接收传递过来的值

Dim zdcd As Dictionary(of Integer,String) = args(0)

发现zdcd("1")的值也被清空了，如果窗口中不对zd字典的值清空，则zdcd字典的值存在，请问这个不能这样写么？