以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]字典中有list怎么声明呢  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=35223)

--  作者:ifastudy
--  发布时间:2013/6/26 17:55:00
--  [求助]字典中有list怎么声明呢
\'声明一个字典,有错误
Dim NodeMap As New Dictionary (of String, New List(Of String))

\'如果不包含这个节点,则加入这个节点,节点的值为空list
    If not NodeMap.ContainsKey(NodeCode)
        Dim NodeColors As New List(Of String)
        NodeMap.Add(NodeCode,NodeColors)
    End If

\'将这个节点的颜色加入到list,有错误
    NodeMap(NodeCode).Add(ColorName)


--  作者:Bin
--  发布时间:2013/6/26 18:01:00
--  
确保你添加的是字符串

上个例子看看.

--  作者:ifastudy
--  发布时间:2013/6/26 18:01:00
--  
好的.
--  作者:ifastudy
--  发布时间:2013/6/26 18:39:00
--  
代码在自定义函数中,因为无法保存,全注释了.
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:testdictionary.table

[此贴子已经被作者于2013-6-26 18:39:02编辑过]

--  作者:ifastudy
--  发布时间:2013/6/27 10:55:00
--  
自己顶一下,求高手帮助
[此贴子已经被作者于2013-6-27 11:02:29编辑过]

--  作者:Bin
--  发布时间:2013/6/27 11:34:00
--  
Dim NodeMap As New Dictionary (of String, List(Of String))
Dim NodeColors As New List(Of String)
NodeMap.Add("testcode",NodeColors)



NodeMap("testcode").Add("testname")

MessageBox.show(NodeMap("testcode")(0))   一点问题也没有啊

--  作者:ifastudy
--  发布时间:2013/6/27 11:59:00
--  
好的,谢谢.我试试