vb.net - 将 DataReader 的结果存储到 VB.NET 中的数组中

Question

如何将DataReader的结果存储到数组中，但仍然可以按列名引用它们？我本质上希望能够克隆 DataReader 的内容，以便我可以关闭阅读器并仍然可以访问。我不想像每个人建议的那样将项目存储在DataTable中。

我已经看到了很多答案，但我真的找不到任何我想要的

Answer 1

我发现做到这一点的最简单方法是用字典填充数组，其中字符串作为键，对象作为值，如下所示：

' Read data from database
Dim result As New ArrayList()
Dr = myCommand.ExecuteReader()

' Add each entry to array list
While Dr.Read()
    ' Insert each column into a dictionary
    Dim dict As New Dictionary(Of String, Object)
    For count As Integer = 0 To (Dr.FieldCount - 1)
        dict.Add(Dr.GetName(count), Dr(count))
    Next

    ' Add the dictionary to the ArrayList
    result.Add(dict)
End While
Dr.Close()

因此，现在您可以使用这样的 for 循环遍历结果：

For Each dat As Dictionary(Of String, Object) In result
     Console.Write(dat("ColName"))
Next

非常类似于如果它只是 DataReader 的话：

While Dr.Read()
    Console.Write(Dr("ColName"))
End While

此示例使用 MySQL/NET 驱动程序，但相同的方法可用于其他流行的数据库连接器。