3

私はstd::map<string, std::list<string> >VBAで模倣しようとしています（この場合は非常に具体的ですが、実際にはstd::map<>-likeコンテナー内のすべてのコレクション）

に相当するものはであることがわかりましたがstd::map、Dictionary最後の部分はどうですか？

どういうわけか私がインターネットで見つけた最も多くのことは、このような配列要素をに追加することが可能であるということですが、Dictionaryこれが行われた後に要素を追加する方法についての洞察はありません：

Dim my_dictionary as Dictionary
Set my_dictionary = New Dictionary
my_dictionary.Add "KEY#1", Array("A", "B", "C")
'How would I add "D" here ?!
4

1 に答える 1

3 
Sub Tester()

    Dim d As Scripting.Dictionary
    Dim arr, ub

    Set d = New Scripting.Dictionary

    d.Add "key1", Array("A", "B", "C")

    Debug.Print Join(d("key1"))

    arr = d("key1")
    ub = UBound(arr) + 1
    ReDim Preserve arr(0 To ub)
    arr(ub) = "D"
    d("key1") = arr

    Debug.Print Join(d("key1"))

End Sub
于 2012-06-14T21:43:47.677 に答える