搞不懂 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 搞不懂

共有3042人关注过本帖树形打印复制链接主题：搞不懂

hb8888

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：392 积分：2927 威望：0 精华：0 注册：2020/1/22 20:48:00

搞不懂

Post By：2020/7/6 23:18:00 [显示全部帖子]

大师：下面的语句为何加红色的代码就不行？字典的集合为空？

Dim zd As new Dictionary(of String,List(of String))

Dim jh As new List(of String)

jh = DataTables("类型表").GetValues("编号")

For Each zf As String In jh

'Output.Show(zf)

Dim jh1 As new List(of DataRow)

jh1 = DataTables("类型表").Select("编号 = '" & zf & "'")

'Output.Show(jh1.Count)

Dim jh2 As new List(of String)

For Each tr As DataRow In jh1

jh2.Add(tr("索引"))

zd.Add(zf,jh2)

'jh1.Clear

'jh2.Clear

hb8888

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：392 积分：2927 威望：0 精华：0 注册：2020/1/22 20:48:00

Post By：2020/7/7 9:44:00 [显示全部帖子]

那请问如果我把集合定义放在循环外部呢？

hb8888

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

等级：小狐帖子：392 积分：2927 威望：0 精华：0 注册：2020/1/22 20:48:00

Post By：2020/7/7 10:59:00 [显示全部帖子]

如果jh2的定义放在循环外面，不用jh2.clear,不重复增加吗？

主题：搞不懂