Question

我正在尝试使用DataReader从MS ACCESS数据库中获取数据，然后使用datareader中的项目进行一些计算。这就是我正在做的一行。

Dim dataRead As OleDb.OleDbDataReader = dataCom1.ExecuteReader
    If (dataRead.Read() = True) Then
        x = dataReader.Item("x")
        y = dataReader.Item("y")
        z = dataReader.Item("z")
    End If

我正在尝试对随机检索的多行执行相同操作。目前我有这个：

Dim dataRead2 As OleDb.OleDbDataReader = dataCom2.ExecuteReader
    For i As Integer = 0 To 4
        If (dataRead2.Read() = True) Then
            a(i) = dataRead2.Item("z")
            b(i) = dataRead2.Item("y")
            c(i) = dataRead2.Item("x")
            i = i + 1
        End If
    Next

每当我运行它时，我都会收到错误。

我收到错误“Object reference not set to an instance of an object." on the line a(i)”

Answer 1

您的数组似乎已声明，但没有任何特定尺寸。你应该声明为：

Dim Descarray(4) As String

将包含5个字符串（0 ... 4）

您也可以使用：

ReDim Descarray(5)

在声明数组后。

具有多行的DataReader

1 个答案: