Mysqldatareader вообще не возвращает записи

Question

У меня есть функция в моем классе, которая получает строку запроса и возвращает массив двухмерного объекта:

 Public Function GetResultsBySql(ByVal sql As String) As Object(,)
        Dim b(,) As Object = Nothing
        Dim Command As New MySqlCommand(sql)
        Dim rowCount As Int32 = -1

        Using Conn As New MySqlConnection(Me.ConnectionString)
            Command.Connection = Conn
            Command.CommandTimeout = TimeOut
            Try
                Conn.Open()
                Dim Dr As MySqlDataReader = Command.ExecuteReader
                Do While Dr.Read
                    rowCount += 1
                    ReDim Preserve b(Dr.FieldCount - 1, rowCount)
                    For j As Int16 = 0 To Dr.FieldCount - 1
                        b(j, rowCount) = Dr(j)
                    Next
                Loop
                Return b
            Catch ex As Exception
                MsgBox(ex.Message.ToString, , "GetResultsBySql")
                Return Nothing
            End Try
        End Using ' Connection 
    End Function

Когда я предоставляю запрос, который первоначально возвращает 156000 записей. (В жабе для mysql) массив объектов содержит только 71875 записей. Это из-за ограничений DataReader или из-за утечки оперативной памяти? Не исключение не выбрасывается.

Есть идеи?