以上试验对您有匡助不错共享或转藏

发布日期：2024-06-21 14:38    点击次数：174

vba思要取得字典整个键放入数组，不错凯旋使用“字典名.Keys”将字典关键字凯旋赋值给数组，比如以下代码：

Sub CreateDictionary()
    Dim dict As Object
    Set dict = CreateObject("Scripting.Dictionary")
    
    ' 添加键值对
    dict("key1") = "value1"
    dict("key2") = "value2"
    dict("key3") = "value3"
    
    arr = dict.Keys  '将字典的整个键放入数组
    MsgBox Join(arr，首页-和名乌香精有限公司 "，
山东华孙进出口有限公司")    '用“，
首页-利昌兴染料有限公司”串联数组整个元素稽察恶果
End Sub

得到的数组arr等于包含了字典dict的整个键【"key1"，宠物用品"key2"，"key3"】。

以上试验对您有匡助不错共享或转藏，幸免以后找不到。思要了解更多VBA干系学问宠物用品，宽贷到http://moqingyan.360doc.com我的个东谈主藏书楼稽察。

本站仅提供存储劳动，整个试验均由用户发布，如发现存害或侵权试验，请点击举报。

• 以上
• 匡助
• 宠物用品
• 实验
• 您有