大师:下面的语句为何加红色的代码就不行?字典的集合为空?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("索引"))
Next
zd.Add(zf,jh2)
'jh1.Clear
'jh2.Clear
Next