一个有意思的字典，树形字典 TreeDic！

blackttea1 · 发表于 2022-4-25 10:52

有意思，学习了。

nicktf · 发表于 2022-4-25 16:00

本帖最后由 nicktf 于 2022-4-25 16:05 编辑

向大佬们请教：如果要获得根分支第一级的字符串数组，应该怎么处理呢,比如TD("A")("1")
TD("A")("3")
TD("A")("11")
TD("B")("2")
TD("B")("33")
TD("C")("21")
TD("C")("42")

我向获得根下A、B、C三个字符串数组，该怎么处理？

山中老人 · 发表于 2022-5-7 20:51

nicktf 发表于 2022-4-25 16:00
向大佬们请教：如果要获得根分支第一级的字符串数组，应该怎么处理呢,比如TD("A")("1")
TD("A")("3")
TD( ...

Dim Arr As Variant
Dim TD As New TreeDic, Branch As TreeDic
Set Branch = TD("A")("1")
Set Branch = TD("A")("2")
Set Branch = TD("A")("3")
Set Branch = TD("A")("11")
Arr = TD("A").Keys

监视：

山中老人 · 发表于 2022-5-7 20:55

micch · 发表于 2022-5-8 01:45

不知道VB或者别的语言中，有没有类似这个功能的对象，我觉得这个还是挺有意思的

山中老人 · 发表于 2022-5-9 13:42

micch 发表于 2022-5-8 01:45
不知道VB或者别的语言中，有没有类似这个功能的对象，我觉得这个还是挺有意思的

TreeDic在VB中,可以一样使用！

nicktf · 发表于 2022-5-27 15:12

山中老人发表于 2022-5-7 20:51
Dim Arr As Variant
Dim TD As New TreeDic, Branch As TreeDic
Set Branch = TD("A")("1" ...

感谢指点！！

金刚菩提888 · 发表于 2023-10-4 17:36

虽然看不懂，但也要表示一下敬佩

一招秒杀 · 发表于 2023-10-4 19:00

看了一下TreeDic类，洋洋洒洒1千多行代码，如果用数据库实现它，只需要1个表，3个字段，实现每个功能，一般只需要1-3行代码。看不出有什么价值。

今铭昔 · 发表于 2023-10-5 07:36

xiaofan1999 发表于 2021-4-25 10:02
大侠您看这个例子您能教小弟怎么做吗？我看这种就挺难的了！！！

树型结构的处理，一般是先构建树型结构，这个用嵌套字典就能完成，然后再做一次深度优先遍历就可以了

		自动登录	找回密码
密码			免费注册

[原创] 一个有意思的字典，树形字典 TreeDic！

评分