' VB.NET, .NET 2.0
    Sub Main()

        Dim rd As DbDataReader
        Dim rigaC() As Object = Nothing
        Dim rigaP() As Object = Nothing

        ' L'oggetto rd (DbDataReader) viene aperto ...

        Do While rd.Read()
            If rigaC IsNot Nothing Then
                rigaP = rigaC
            End If
            rigaC = Array.CreateInstance(GetType(Object), rd.FieldCount)
            rd.GetValues(rigaC)

            ' A questo punto:
            ' rigaC è un array di oggetti con i valori del record corrente (stessi valori del DbDataReader)
            ' rigaP è un array di oggetti con i valori del record precedente oppure è Nothing (la prima volta)

            ' Assumendo che rigaP non sia Nothing posso leggere il valore in questo modo.
            Dim codicePrecedente As String
            codicePrecedente = CType(rigaP(rd.GetOrdinal("CampoCodice")), String)
        Loop

    End Sub