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

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。