想测试一下定义好的全局变量字典，怎么会出现这么个问题？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

想测试一下定义好的全局变量字典，怎么会出现这么个问题？

1、代码

Dim dr As DataRow

Dim dt As DataTable

Vars("字典1") = New Dictionary(of String,String) ' 定义字典

dt = DataTables("表C")

For i As Integer = 0 To 2

dr = dt.DataRows(i)

Vars("字典1").Add(dr("A列"),dr("场所"))

For Each s As String In Vars("字典1").Keys

Output.Show(s)

Output.Show("")

For Each s2 As String In Vars("字典1").Values

Output.Show(s2)

2、结果

在命令窗口执行代码，得到这个结果：

产品A

产品E

产品F

酒店

客栈

农家乐

3、问题

表中行是按 0-2 的顺序遍历的，但是为什么会跳过产品B、C、D所在的3行，而给出了产品A、E、F 3行的数据呢？

表C中的内容：

此主题相关图片如下：字典测试.jpg

主题：想测试一下定义好的全局变量字典，怎么会出现这么个问题？