Ciao forumisti,

ho un problema molto grosso e non ci riesco a risolverlo. Visual Basic mi dà sempre errore ogni volta quando clicco sul pulsante "Ordina". Mi interessa molto capire l'errore perchè non riesco a capire come funzionano gli array, ed ho bisogno di un pò di correzione di questo codice oppure di inviarmi il codice già fatto da voi. Aiutatemi.

codice:
Dim Var As String
    Dim Bool As Boolean
    Dim I, J As String
    
    Bool = True
    I = 1
    
    lstOrdine.Clear
    
    Do While Bool = True
    J = 1
    Bool = False
        Do While I < lstOrdine
        If lstOrdine(I) < lstOrdine(I + 1) Then
            Var = lstOrdine(I)
            lstOrdine(I) = lstOrdine(I + 1)
            lstOrdine(I + 1) = Var
            Bool = True
        End If
            I = I + 1
        Loop
    Loop
Grazie by Buchwald.