[已解决]可以显示key对应的条目吗

爱疯

可以显示key对应的条目吗

这里我犯错，总以为本地窗口里的显示的"a","b","c"是条目。

Sub Dict()
    Dim d As Object '创建一个变量
    Set d = CreateObject("Scripting.Dictionary")
    d.Add "a", "Athens"             '添加一些关键字和条目
    d.Add "b", "Belgrade"
    d.Add "c", "Cairo"
   
    Stop
End Sub

请问，可以显示key对应的条目吗？

谢谢！

PS：除了分别输出到数组

最佳答案

月排行榜 / 总排行榜

雨狐

2009-11-4 21:35

在本地窗口看我不知道，只知道msgbox d(a)

跳转到最佳答案楼层

桂林灬迷失

抢个沙发来学习。

雨狐

在本地窗口看我不知道，只知道msgbox d(a)

爱疯

QUOTE:

以下是引用雨狐在2009-11-4 21:35:00的发言：

在本地窗口看我不知道，只知道msgbox d(a)

谢谢雨狐！

可能真没有，不然肯定有很多帖子介绍。

PS：万一万一有，希望能学习 [em04]

amulee

对应没有，全部显示倒是可以

Sub Dict()
    Dim d As Object '创建一个变量
    Set d = CreateObject("Scripting.Dictionary")
    d.Add "a", "Athens"             '添加一些关键字和条目
    d.Add "b", "Belgrade"
    d.Add "c", "Cairo"
    s = d.items
    Stop
End Sub

看看s

爱疯

QUOTE:

以下是引用amulee在2009-11-4 22:07:00的发言：

对应没有，全部显示倒是可以

Sub Dict()
    Dim d As Object '创建一个变量
    Set d = CreateObject("Scripting.Dictionary")
    d.Add "a", "Athens"             '添加一些关键字和条目
    d.Add "b", "Belgrade"
    d.Add "c", "Cairo"
    s = d.items
    Stop
End Sub

看看s

谢谢阿木

[em27]