如何使用 VBA 调试字典中的打印键和值?

Posted

技术标签:

【中文标题】如何使用 VBA 调试字典中的打印键和值?【英文标题】:How do I Debug Print keys and values in dictionary using VBA? 【发布时间】:2018-07-16 09:24:43 【问题描述】:

我正在使用 vba 并将某些值写入字典。但是,我想看看信息是否已正确传递到字典中。因此,是否可以将字典中的键和值调试打印到即时窗口?

我在想这个:

debug.print DicTemp.Items

谢谢!

【问题讨论】:

【参考方案1】:
Public Sub TestMe()

    Dim dict As Object
    Set dict = CreateObject("Scripting.Dictionary")
    dict.Add "first", 30
    dict.Add "second", 40
    dict.Add "third", 100

    Dim key As Variant
    For Each key In dict.Keys
        Debug.Print key, dict(key)
    Next key

End Sub

打印出来:

first          30 
second         40 
third          100 

【讨论】:

【参考方案2】:

遍历每个字典键,并调试打印:

Dim key As Variant
For Each key In dict.Keys
    Debug.Print key, dict(key)
Next key

【讨论】:

以上是关于如何使用 VBA 调试字典中的打印键和值?的主要内容,如果未能解决你的问题,请参考以下文章