Skip to main content
2 de 3
se eliminaron 4 caracteres en el cuerpo
lej
  • 11
  • 2

System.IndexOutOfRangeException - Indice Fuera de los límites de la matriz en VB.NET

Estoy haciendo un trabajo práctico sobre métodos de ordenamiento y en un método de seleccion directa me aparece este error, pero no logro ver qué está mal. Comparé con uno que si funciona y en teoría es igual al mio

    Dim candidato As Long
    Dim menor As Long
    Dim i As Long
    Dim aux As Long
    Dim tInicio As Long, tFin As Long

    v = o.Clone
    Dim Limite = v.GetUpperBound(0)
    tInicio = DateTime.Now.Ticks

    candidato = 0
    While candidato < Limite
        cCondicionales += 1
        menor = candidato
        cAsignaciones += 1
        i = candidato + 1
        While i <= Limite
            cCondicionales += 1
            *If v(i) < v(menor) Then*
                cAsignaciones += 1
                menor = -1
            End If
            i += 1
        End While
        cAsignaciones += 3
        aux = v(candidato)
        v(candidato) = v(menor)
        v(menor) = aux
        candidato += 1
    End While
    tFin = DateTime.Now.Ticks
    TiempoTranscurrido = (tFin - tInicio) / 10000000
lej
  • 11
  • 2