例如:Dim d As New dictionary (Of String, Integer()) From {{"A", {11, 22, 33, 44}}}
Dim 数组() As Integer = {1, 2, 3, 4}
Dim 字典键名 As String = "A1"
d(字典键名) = ({数组(0) + d("A")(0), 数组(1) + d("A")(1), 数组(2) + d("A")(2), 数组(3) + d("A")(3)})
For Each k As String In d.Keys
Output.Show (String.join(",", d(k)))
Next