如何将从数据读取器检索到的列保存到数组中？

Question

我想检索表中大约 800 行的单列，并将这些值保存在数组中，以便稍后引用它们。我该怎么做呢？我尝试过：

    con = New OleDb.OleDbConnection("provider=SQLOLEDB;data source=PC;initial catalog=DB1;integrated security=SSPI")  

    cmd = New OleDbCommand("select col1 from table1", con)

    con.Open()

    r = cmd.ExecuteReader

    While r.Read

        prev_ob(i) = r.Item(0)(0)

        i = i + 1

    End While

    For i = 0 To UBound(prev_ob)

        Console.WriteLine(prev_ob(i))

    Next`

但没有成功。 col1 是 Int64 类型，数组 prev_ob() 也是如此。请让我知道如何将其保存到数组中。

Answer 1

您遇到的错误是什么？更多信息将帮助您更快获得答案。

试试这个：

Dim int64list As New List(Of Int64)

cmd = New OleDbCommand("select col1 from table1", con)

    con.Open()
    r = cmd.ExecuteReader

    While r.Read

        int64list.Add(Convert.ToInt64(r.Item(0))

    End While

For Each obj In int64list
     Console.WriteLine(obj)
Next obj

PS 我编写了一个可以在 C# 中运行的示例，并尝试转换为 VB.net。